From c3a73a1777fc47455fd63bb0a2ab2579cba918a5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jo=C3=A3o=20T=C3=A1vora?= Date: Sat, 4 Apr 2015 10:25:46 +0100 Subject: [PATCH] Add a test case for fixing * snippet-tests.el (snippet--test-snippets-alist): Add a failing dynamic snippet. --- snippet-tests.el | 24 ++++++++++++++++++------ 1 file changed, 18 insertions(+), 6 deletions(-) diff --git a/snippet-tests.el b/snippet-tests.el index 40ce0b6..16d2930 100644 --- a/snippet-tests.el +++ b/snippet-tests.el @@ -36,12 +36,24 @@ (contrived ((&field 1) (&field 2) (&field 3))) - (nested ("a " - (&field 1 (&nested (&field 2 "nested") - " " - (&field 3 "field"))) - " and its mirror: " - (&mirror 1))) + (nested + ;; static + ;; + ("a " + (&field 1 (&nested (&field 2 "nested") + " " + (&field 3 "field"))) + " and its mirror: " + (&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 " (&field 1 (&nested (&field 2 "nested") " "