diff --git a/yasnippet-tests.el b/yasnippet-tests.el index 98b2ddc..0df9598 100644 --- a/yasnippet-tests.el +++ b/yasnippet-tests.el @@ -67,6 +67,15 @@ (should (string= (yas--buffer-contents) "bla from another BLA")))) +(ert-deftest primary-field-transformation () + (with-temp-buffer + (yas-minor-mode 1) + (let ((snippet "${1:$$(upcase yas/text)}${1:$(concat \"bar\" yas/text)}")) + (yas-expand-snippet snippet) + (should (string= (yas--buffer-contents) "bar")) + (ert-simulate-command `(yas-mock-insert "foo")) + (should (string= (yas--buffer-contents) "FOObarFOO"))))) + (ert-deftest nested-placeholders-kill-superfield () (with-temp-buffer (yas-minor-mode 1) @@ -168,27 +177,6 @@ (yas-expand-snippet "Look ma! ${1:`(yas/selected-text)`} OK?") (should (string= (yas--buffer-contents) "Look ma! He)}o world! OK?"))))) -(ert-deftest mirror-transformation () - (with-temp-buffer - (yas-minor-mode 1) - (let ((snippet "${1:`(concat \"foo\" \"bar\")`} ${1:$(concat (upcase yas/text) \"baz\")}")) - (yas-expand-snippet snippet) - (should (string= (yas--buffer-contents) "foobar FOOBARbaz")) - (yas-exit-all-snippets) - (erase-buffer) - (yas-expand-snippet snippet) - (ert-simulate-command `(yas-mock-insert "bla")) - (should (string= (yas--buffer-contents) "bla BLAbaz"))))) - -(ert-deftest primary-field-transformation () - (with-temp-buffer - (yas-minor-mode 1) - (let ((snippet "${1:$$(upcase yas/text)}${1:$(concat \"bar\" yas/text)}")) - (yas-expand-snippet snippet) - (should (string= (yas--buffer-contents) "bar")) - (ert-simulate-command `(yas-mock-insert "foo")) - (should (string= (yas--buffer-contents) "FOObarFOO"))))) - (ert-deftest example-for-issue-271 () (with-temp-buffer (yas-minor-mode 1)