Ver Fonte

test-org: Disambiguate tests for `org-end-of-line'.

Nicolas Goaziou há 12 anos atrás
pai
commit
f3a2515205
1 ficheiros alterados com 3 adições e 3 exclusões
  1. 3 3
      testing/lisp/test-org.el

+ 3 - 3
testing/lisp/test-org.el

@@ -458,20 +458,20 @@ http://article.gmane.org/gmane.emacs.orgmode/21459/"
 	    (eolp))))
   ;; At an headline with special movement.
   (should
-   (org-test-with-temp-text "* Headline :tag:\n"
+   (org-test-with-temp-text "* Headline1 :tag:\n"
      (let ((org-special-ctrl-a/e t))
        (and (progn (org-end-of-line) (looking-at " :tag:"))
 	    (progn (org-end-of-line) (eolp))
 	    (progn (org-end-of-line) (looking-at " :tag:"))))))
   ;; At an headline without special movement.
   (should
-   (org-test-with-temp-text "* Headline :tag:\n"
+   (org-test-with-temp-text "* Headline2 :tag:\n"
      (let ((org-special-ctrl-a/e nil))
        (and (progn (org-end-of-line) (eolp))
 	    (progn (org-end-of-line) (eolp))))))
   ;; At an headline, with reversed movement.
   (should
-   (org-test-with-temp-text "* Headline :tag:\n"
+   (org-test-with-temp-text "* Headline3 :tag:\n"
      (let ((org-special-ctrl-a/e 'reversed)
 	   (this-command last-command))
        (and (progn (org-end-of-line) (eolp))