[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [emacs-wiki-discuss] emacs-wiki-journal-add-entry
From: |
Yamagata Yoriyuki |
Subject: |
Re: [emacs-wiki-discuss] emacs-wiki-journal-add-entry |
Date: |
Mon, 22 Nov 2004 00:38:06 +0900 (JST) |
Here is a patch.
--- orig/emacs-wiki-journal.el
+++ mod/emacs-wiki-journal.el
@@ -245,14 +245,14 @@
If NO-CHECK-P is non-nil, then don't check for changes in the directories
to decide whether to re-read the cached alist, just re-read the disk."
(let ((file-alist
- (cdr (assoc emacs-wiki-journal-project emacs-wiki-file-alist)))
+ (car (cdr (assoc emacs-wiki-journal-project emacs-wiki-file-alist))))
(category-alist nil))
(save-match-data
(mapc
(lambda (file)
(if (string-match emacs-wiki-journal-category-regexp
(car file))
- (setq category-alist (cons file category-alist))))
+ (setq category-alist (cons (car file) category-alist))))
file-alist))
category-alist))