ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

test-org: Concretize test 

* testing/lisp/test-org.el (test-org/set-tags-command): Test
  specifically for the C-u prefix for tag alignment.
This commit is contained in:
Marco Wahl 2019-01-05 13:45:04 +01:00
parent 2862bea69b
commit 7d638dcd49
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.el
View File

@ -6411,11 +6411,11 @@ Paragraph<point>"
(goto-char (point-max))
(org-set-tags-command)))
(buffer-string))))
;; With a non-nil prefix argument, align all tags in the buffer.
;; With a C-u prefix argument, align all tags in the buffer.
(should
(equal "* H1 :foo:\n* H2 :bar:"
(org-test-with-temp-text "* H1 :foo:\n* H2 :bar:"
(let ((org-tags-column 1)) (org-set-tags-command t))
(let ((org-tags-column 1)) (org-set-tags-command '(4)))
(buffer-string)))))
(ert-deftest test-org/toggle-tag ()