# HG changeset patch # User Eli Zaretskii # Date 1224410808 0 # Node ID 444fb994e174adad8984ecbff61c440e1c610c0f # Parent 1dd023ea43daa87770016339e3c070bcff89e733 (todo-file-do, todo-file-done, todo-file-top): Run file names that begin with a period thru `convert-standard-filename'. diff -r 1dd023ea43da -r 444fb994e174 lisp/calendar/todo-mode.el --- a/lisp/calendar/todo-mode.el Sun Oct 19 09:36:51 2008 +0000 +++ b/lisp/calendar/todo-mode.el Sun Oct 19 10:06:48 2008 +0000 @@ -282,11 +282,11 @@ the diary file somewhat." :type 'string :group 'todo) -(defcustom todo-file-do "~/.todo-do" +(defcustom todo-file-do (convert-standard-filename "~/.todo-do") "TODO mode list file." :type 'file :group 'todo) -(defcustom todo-file-done "~/.todo-done" +(defcustom todo-file-done (convert-standard-filename "~/.todo-done") "TODO mode archive file." :type 'file :group 'todo) @@ -316,7 +316,7 @@ :group 'todo) (defvar todo-edit-buffer " *TODO Edit*" "TODO Edit buffer name.") -(defcustom todo-file-top "~/.todo-top" +(defcustom todo-file-top (convert-standard-filename "~/.todo-top") "TODO mode top priorities file. Not in TODO format, but diary compatible.