mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 18:00:49 +00:00
Code Releases Activity

test-org-element: Fix a test about block switches

Browse source
This commit is contained in:
Nicolas Goaziou 2012-03-10 13:46:35 +01:00
parent c7203b4142
commit 06a1b8615d
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
testing/lisp/test-org-element.el
View file

@ -195,12 +195,12 @@
"#+BEGIN_EXAMPLE -l \"[ref:%s]\"\nText [ref:text]\n#+END_EXAMPLE"
(let ((element (org-element-current-element)))
(should
(equal (org-element-property :coderef-fmt element) "[ref:%s]"))))
(equal (org-element-property :label-fmt element) "[ref:%s]"))))
(org-test-with-temp-text
"#+BEGIN_SRC emacs-lisp -l \"[ref:%s]\"\n(+ 1 1) [ref:text]\n#+END_SRC"
(let ((element (org-element-current-element)))
(should
(equal (org-element-property :coderef-fmt element) "[ref:%s]"))))))
(equal (org-element-property :label-fmt element) "[ref:%s]"))))))