;; Author: Oliver Seidel <os10000@seidel-space.de>
;; [Not clear the above works, July 2000]
;; Created: 2 Aug 1997
-;; Version: $Id: todo-mode.el,v 1.46 2001/07/05 13:51:17 gerd Exp $
+;; Version: $Id: todo-mode.el,v 1.47 2001/07/16 12:22:59 pj Exp $
;; Keywords: calendar, todo
;; This file is part of GNU Emacs.
;;
;; Which version of todo-mode.el does this documentation refer to?
;;
-;; $Id: todo-mode.el,v 1.46 2001/07/05 13:51:17 gerd Exp $
+;; $Id: todo-mode.el,v 1.47 2001/07/16 12:22:59 pj Exp $
;;
;; Pre-Requisites
;;
(defun todo-save ()
"Save the TODO list."
(interactive)
- (save-buffer)
- (if todo-save-top-priorities-too (todo-save-top-priorities))
- )
+ (save-excursion
+ (save-restriction
+ (save-buffer)
+ (if todo-save-top-priorities-too (todo-save-top-priorities))
+ )))
(defalias 'todo-cmd-save 'todo-save)
(defun todo-quit ()