[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[emacs-wiki-discuss] emacs-wiki-journal-add-entry
From: |
Yamagata Yoriyuki |
Subject: |
[emacs-wiki-discuss] emacs-wiki-journal-add-entry |
Date: |
Sun, 21 Nov 2004 21:54:04 +0900 (JST) |
Hi, folks.
After I update emacs-wiki today from the GNU Arch, I got the error
from emacs-wiki-journal-add-entry. Before the update, there is no
problem.
Any idea? Here is a backtrace.
Debugger entered--Lisp error: (wrong-type-argument stringp ("Computer" .
"/home/yori/Blog/Computer"))
string-match("^Category\\([A-Z][a-z]+\\)+$" ("Computer" .
"/home/yori/Blog/Computer"))
(if (string-match emacs-wiki-journal-category-regexp (car file)) (setq
category-alist (cons file category-alist)))
(lambda (file) (if (string-match emacs-wiki-journal-category-regexp ...)
(setq category-alist ...)))((("Computer" . "/home/yori/Blog/Computer")
("Contents" . "/home/yori/Blog/Contents") ("ComputerMemo" .
"/home/yori/Blog/ComputerMemo") ("CategoryMisc" .
"/home/yori/Blog/CategoryMisc") ("MyJournal" . "/home/yori/Blog/MyJournal")))
mapc((lambda (file) (if (string-match emacs-wiki-journal-category-regexp ...)
(setq category-alist ...))) ((("Computer" . "/home/yori/Blog/Computer")
("Contents" . "/home/yori/Blog/Contents") ("ComputerMemo" .
"/home/yori/Blog/ComputerMemo") ("CategoryMisc" .
"/home/yori/Blog/CategoryMisc") ("MyJournal" . "/home/yori/Blog/MyJournal"))
16800 36094))
(progn (mapc (lambda ... ...) file-alist))
(unwind-protect (progn (mapc ... file-alist)) (set-match-data
save-match-data-internal))
(let ((save-match-data-internal ...)) (unwind-protect (progn ...)
(set-match-data save-match-data-internal)))
(save-match-data (mapc (lambda ... ...) file-alist))
(let ((file-alist ...) (category-alist nil)) (save-match-data (mapc ...
file-alist)) category-alist)
emacs-wiki-journal-category-alist()
(let* ((directory emacs-wiki-journal-directory) (file-alist ...)
(emacs-wiki-default-page emacs-wiki-journal-default-category))
(emacs-wiki-read-name file-alist "Category: "))
emacs-wiki-journal-prompt-for-category-wiki()
(let ((category ...) (heading ...)) (emacs-wiki-journal-prepare-journal)
(emacs-wiki-journal-add category heading))
emacs-wiki-journal-add-entry()
call-interactively(emacs-wiki-journal-add-entry)
--
Yamagata Yoriyuki
- [emacs-wiki-discuss] emacs-wiki-journal-add-entry,
Yamagata Yoriyuki <=