2 files changed, 9 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 576afa3c4eb..bd3e2b601ba 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 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.
         (todos-reset-global-current-todos-file):
         Try to make this not slow down kill-buffer.
diff --git a/lisp/calendar/todos.el b/lisp/calendar/todos.el
index 89bfeabb919..7ecd4d03ade 100644
--- 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)