wip: fix a trivial test

This commit is contained in:
Joao Tavora 2013-11-06 01:07:55 +00:00
parent dc12a8b4a2
commit fc8804471a

View File

@ -249,7 +249,7 @@
(should (equal (snippet--canonicalize-form '(&field 1 (&transform (foo)))) (should (equal (snippet--canonicalize-form '(&field 1 (&transform (foo))))
'(&field 1 (&transform (foo))))) '(&field 1 (&transform (foo)))))
(should (equal (snippet--canonicalize-form '(&field 1 (&nested (foo) (bar)))) (should (equal (snippet--canonicalize-form '(&field 1 (&nested (foo) (bar))))
'(&field 1 (&nested (foo) (bar))))) '(&field 1 (&nested (&eval (foo)) (&eval (bar))))))
(should (equal (snippet--canonicalize-form '(&field 1)) (should (equal (snippet--canonicalize-form '(&field 1))
'(&field 1 nil))) '(&field 1 nil)))
;; mirrors ;; mirrors
@ -264,11 +264,11 @@
;; exit ;; exit
;; ;;
(should (equal (snippet--canonicalize-form '&exit) (should (equal (snippet--canonicalize-form '&exit)
'(&exit nil nil))) '(&exit (&eval nil))))
(should (equal (snippet--canonicalize-form `(&exit)) (should (equal (snippet--canonicalize-form `(&exit))
'(&exit nil nil))) '(&exit (&eval nil))))
(should (equal (snippet--canonicalize-form `(&exit (foo))) (should (equal (snippet--canonicalize-form `(&exit (foo)))
'(&exit nil (&eval (foo))))) '(&exit (&eval (foo)))))
;; constants ;; constants
;; ;;
(should (equal (snippet--canonicalize-form "bla") (should (equal (snippet--canonicalize-form "bla")