From 7d638dcd498133d217ac3390dfd32effb68217bf Mon Sep 17 00:00:00 2001 From: Marco Wahl Date: Sat, 5 Jan 2019 13:45:04 +0100 Subject: [PATCH] test-org: Concretize test * testing/lisp/test-org.el (test-org/set-tags-command): Test specifically for the C-u prefix for tag alignment. --- testing/lisp/test-org.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/testing/lisp/test-org.el b/testing/lisp/test-org.el index a77c0f729..86d8a7da4 100644 --- a/testing/lisp/test-org.el +++ b/testing/lisp/test-org.el @@ -6411,11 +6411,11 @@ Paragraph" (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 ()