mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-17 10:06:13 +00:00
Code Issues Releases Activity

todo-mode: don't assume an ordering of tests

Browse Source 
* test/lisp/calendar/todo-mode-tests.el (todo-test-todo-quit02)
(todo-test-item-highlighting): Avoid prompting for input file.
This commit is contained in:
Glenn Morris 2017-05-29 17:50:36 -07:00
parent 2a22a65fe1
commit 941a2e7347
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
test/lisp/calendar/todo-mode-tests.el
View File

@ -5,18 +5,20 @@
;; Author: Stephen Berman <stephen.berman@gmx.net>
;; Keywords: calendar
;; This program is free software; you can redistribute it and/or modify
;; This file is part of GNU Emacs.
;; GNU Emacs is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;; This program is distributed in the hope that it will be useful,
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with this program. If not, see <http://www.gnu.org/licenses/>.
;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
@ -93,6 +95,7 @@ current again."
If the buffer made current by invoking todo-quit in a todo-mode
buffer is buried by quit-window, the todo-mode buffer should not
become current."
(todo-test-get-archive 2)
(todo-show)
(should (todo-test-is-current-buffer todo-test-file-1))
(let ((dir (dired default-directory)))
@ -105,6 +108,7 @@ become current."
(ert-deftest todo-test-item-highlighting () ; bug#27133
"Test whether `todo-toggle-item-highlighting' highlights whole item.
In particular, all lines of a multiline item should be highlighted."
(todo-test-get-archive 2)
(todo-show)
(todo-jump-to-category nil "testcat1") ; For test rerun.
(todo-toggle-item-highlighting)