From f4b002dc4dd16133890e6a1b503d416ed0d56cae Mon Sep 17 00:00:00 2001
From: Michael Olson <mwolson@gnu.org>
Date: Mon, 30 Jun 2008 07:00:03 -0700
Subject: [PATCH] Use better fix.

For some reason, add-to-list was doing strange things to the resulting
list.
---
 planner.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/planner.el b/planner.el
index 86e916e..2bde697 100644
--- a/planner.el
+++ b/planner.el
@@ -1243,7 +1243,8 @@ If EXCLUDE-TEMP is non-nil, ignore unsaved buffers."
         files)
     (mapcar (lambda (item)
               (when (string-match planner-date-regexp (car item))
-                (add-to-list 'files (cons item files))))
+                (unless (rassoc (cdr item) files)
+                  (setq files (cons item files)))))
             (planner-file-alist))
     (unless exclude-temp
       (while buffers
-- 
2.11.4.GIT