emacs-wiki-discuss
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[emacs-wiki-discuss] planner-list-daily-files bug


From: Frederik Fouvry
Subject: [emacs-wiki-discuss] planner-list-daily-files bug
Date: Tue, 20 Apr 2004 12:27:01 +0200 (CEST)

Hi,

If there is a buffer in planner-mode without associated file,
then planner-list-daily-files() in planner.el returns an error
because planner-page-name() returns nil.  Here's a patch to solve
the problem:

--- planner.el~ 2004-03-30 06:55:45.000000000 +0200
+++ planner.el  2004-04-20 12:24:30.000000000 +0200
@@ -876,10 +876,12 @@
                                 'no-sort)))
     (while buffers
       (with-current-buffer (car buffers)
-        (when (and (equal 'planner-mode major-mode)
-                   (string-match planner-date-regexp (planner-page-name)))
-          (add-to-list 'temp (planner-page-name))))
-      (setq buffers (cdr buffers)))
+       (let ((planner-page-name (planner-page-name)))
+         (when (and planner-page-name
+                    (equal 'planner-mode major-mode)
+                    (string-match planner-date-regexp planner-page-name))
+           (add-to-list 'temp planner-page-name)))
+       (setq buffers (cdr buffers))))
     temp))
 
 (defun planner-get-day-pages (&optional from to)

It first checks whether there is a file name associated with it.
If yes it continues as before; if no, it continues with the next
buffer.

Frederik




reply via email to

[Prev in Thread] Current Thread [Next in Thread]