* calendar/todos.el: Doubts about todos-ignore-archived-categories.

(todos-ignore-archived-categories): Change default value.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 576afa3c4eb40b95b17e5270a56bf82da598d2fa..bd3e2b601badc44096989904b0722fea49b34020 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-09-21  Stephen Berman  <stephen.berman@gmx.net>
+
+       * calendar/todos.el: Doubts about todos-ignore-archived-categories.
+       (todos-ignore-archived-categories): Change default value.
+
 2012-09-21  Stephen Berman  <stephen.berman@gmx.net>
 
        * calendar/todos.el: Further comment revision.

diff --git a/lisp/calendar/todos.el b/lisp/calendar/todos.el
index 89bfeabb919e776bf6b99a65af5ad6e27ba055a8..7ecd4d03aded5f1e5398f66167e1da857afece44 100644 (file)
--- a/lisp/calendar/todos.el
+++ b/lisp/calendar/todos.el
@@ -341,7 +341,8 @@ Done items from corresponding archive files are also included."
   :type 'boolean
   :group 'todos)
 
-(defcustom todos-ignore-archived-categories nil
+;; FIXME: make this effect only navigation?
+(defcustom todos-ignore-archived-categories t
   "Non-nil to ignore categories with only archived items.
 When non-nil such categories are omitted from `todos-categories'
 and hence from commands that use this variable.  An exception is
@@ -354,6 +355,8 @@ archived categories."
   :set 'todos-reset-categories
   :group 'todos)
 
+;; FIXME: if this is saved and todos.el is loaded before custom-file,
+;; categories mode does not show archived categories
 (defun todos-reset-categories (symbol value)
   "The :set function for `todos-ignore-archived-categories'."
   (custom-set-default symbol value)