aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/calendar
diff options
context:
space:
mode:
authorStefan Monnier <[email protected]>2008-01-04 06:18:31 +0000
committerStefan Monnier <[email protected]>2008-01-04 06:18:31 +0000
commit3da360a745b3835504e7ac426dfec5f0908dcb3a (patch)
treeffbf81ede7228692430a2deee93a2fb58f52c22d /lisp/calendar
parenta5832373fdb7016415239fadf524dc45c953acc5 (diff)
* progmodes/ada-xref.el (ada-prj-find-prj-file):
* progmodes/ada-mode.el (comment-region): * calendar/todo-mode.el (todo-insert-item): * bookmark.el (bookmark-buffer-name): Test major-mode rather than mode-name.
Diffstat (limited to 'lisp/calendar')
-rw-r--r--lisp/calendar/todo-mode.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el
index e3db7e4640..1727ed09d8 100644
--- a/lisp/calendar/todo-mode.el
+++ b/lisp/calendar/todo-mode.el
@@ -1,6 +1,6 @@
;;; todo-mode.el --- major mode for editing TODO list files
-;; Copyright (C) 1997, 1999, 2001, 2002, 2003, 2004, 2005, 2006, 2007
+;; Copyright (C) 1997, 1999, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
;; Free Software Foundation, Inc.
;; Author: Oliver Seidel <[email protected]>
@@ -592,7 +592,7 @@ With a prefix argument solicit the category, otherwise use the current
category."
(interactive "P")
(save-excursion
- (if (not (string-equal mode-name "TODO")) (todo-show))
+ (if (not (derived-mode-p 'todo-mode)) (todo-show))
(let* ((new-item (concat todo-prefix " "
(read-from-minibuffer
"New TODO entry: "
@@ -615,7 +615,7 @@ category."
"Insert new TODO list entry under the cursor."
(interactive "")
(save-excursion
- (if (not (string-equal mode-name "TODO")) (todo-show))
+ (if (not (derived-mode-p 'todo-mode)) (todo-show))
(let* ((new-item (concat todo-prefix " "
(read-from-minibuffer
"New TODO entry: "
@@ -959,5 +959,5 @@ Number of entries for each category is given by `todo-print-priorities'."
(provide 'todo-mode)
-;;; arch-tag: 6fd91be5-776e-4464-a109-da4ea0e4e497
+;; arch-tag: 6fd91be5-776e-4464-a109-da4ea0e4e497
;;; todo-mode.el ends here