diff options
| author | Oliver Seidel <os10000@seidel-space.de> | 1997-10-28 19:41:53 +0000 |
|---|---|---|
| committer | Oliver Seidel <os10000@seidel-space.de> | 1997-10-28 19:41:53 +0000 |
| commit | e05e3850a08841cfb201ca4712e00eb4091cc3af (patch) | |
| tree | 855927912b86128f773cb65c62a10b8bf6ab9df9 /lisp/calendar/todo-mode.el | |
| parent | 7a31427e9d6b824ec8d1e8ff410a310d115a3f49 (diff) | |
| download | emacs-e05e3850a08841cfb201ca4712e00eb4091cc3af.tar.gz | |
Added fix from Frank Ridderbusch <ridderbusch.pad@sni.de>,
an apostrophe was missing.
Diffstat (limited to 'lisp/calendar/todo-mode.el')
| -rw-r--r-- | lisp/calendar/todo-mode.el | 16 |
1 files changed, 13 insertions, 3 deletions
diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el index 3d7eac6902a..21293466d94 100644 --- a/lisp/calendar/todo-mode.el +++ b/lisp/calendar/todo-mode.el @@ -4,7 +4,7 @@ ;; Author: Oliver.Seidel@cl.cam.ac.uk (was valid on Aug 2, 1997) ;; Created: 2 Aug 1997 -;; Version: $Id: todo-mode.el,v 1.22 1997/10/24 16:53:20 os10000 Exp os10000 $ +;; Version: $Id: todo-mode.el,v 1.23 1997/10/24 17:30:54 os10000 Exp os10000 $ ;; Keywords: Categorised TODO list editor, todo-mode ;; This file is part of GNU Emacs. @@ -72,7 +72,7 @@ ;; ;; Which version of todo-mode.el does this documentation refer to? ;; -;; $Id: todo-mode.el,v 1.22 1997/10/24 16:53:20 os10000 Exp os10000 $ +;; $Id: todo-mode.el,v 1.23 1997/10/24 17:30:54 os10000 Exp os10000 $ ;; ;; Pre-Requisites ;; @@ -245,6 +245,16 @@ ;;; Change Log: ;; $Log: todo-mode.el,v $ +;; Revision 1.23 1997/10/24 17:30:54 os10000 +;; Added three suggestions from Carsten +;; Dominik <dominik@strw.LeidenUniv.nl>: +;; +;; - recommend autoloading instead of require +;; - inserting from different buffer didn't work +;; (now fixed -- I pray) +;; - provided public entry point to insert items +;; from normal lisp code +;; ;; Revision 1.22 1997/10/24 16:53:20 os10000 ;; Paul Stodghill <stodghil@CS.Cornell.EDU> writes: ;; @@ -979,7 +989,7 @@ If SEPARATORS is absent, it defaults to \"[ \\f\\t\\n\\r\\v]+\"." (goto-char (point-min)) (and (search-forward "todo-cats:" nil t) (replace-match "todo-categories:")) - (make-local-variable todo-categories) + (make-local-variable 'todo-categories) (setq todo-categories todo-cats))) (beginning-of-line) (todo-category-select)) |