mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

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

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]"))))))