Add a test case for fixing

* snippet-tests.el (snippet--test-snippets-alist): Add a failing
dynamic snippet.
This commit is contained in:
João Távora 2015-04-04 10:25:46 +01:00
parent 7750c03f4b
commit c3a73a1777

View File

@ -36,12 +36,24 @@
(contrived ((&field 1) (contrived ((&field 1)
(&field 2) (&field 2)
(&field 3))) (&field 3)))
(nested ("a " (nested
;; static
;;
("a "
(&field 1 (&nested (&field 2 "nested") (&field 1 (&nested (&field 2 "nested")
" " " "
(&field 3 "field"))) (&field 3 "field")))
" and its mirror: " " and its mirror: "
(&mirror 1))) (&mirror 1))
;; dynamic
((insert "a ")
(&field 1
(&field 2 (insert "nested"))
(insert " ")
(&field 3 (insert "field")))
(insert " and its mirror: ")
(&mirror 1 (s e)
(insert s))))
(mirror-of-nested-field ("a " (mirror-of-nested-field ("a "
(&field 1 (&nested (&field 2 "nested") (&field 1 (&nested (&field 2 "nested")
" " " "