Re: Re: emacs-wiki-journal-add-entry

From: Michael Olson <mwolson@xxxxxxxxxxxxxx>
Subject: [emacs-wiki-discuss] Re: emacs-wiki-journal-add-entry
Date: Wed, 24 Nov 2004 02:51:27 -0500

> Can you update using Arch once more and see if it works properly now?

Unfortunately, I got the same error before.  My arch is looking
http://www.mwolson.org/archives/2004.  Is this a correct location?

Here are a backtrace.

Debugger entered--Lisp error: (wrong-type-argument stringp ("EmacsWiki" . 
"/home/yori/Blog/EmacsWiki"))
  string-match("^Category\\([A-Z][a-z]+\\)+$" ("EmacsWiki" . 
"/home/yori/Blog/EmacsWiki"))
  (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 ...)))((("EmacsWiki" . "/home/yori/Blog/EmacsWiki") 
("MyJournal1" . "/home/yori/Blog/MyJournal1") ("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 ...))) ((("EmacsWiki" . "/home/yori/Blog/EmacsWiki") 
("MyJournal1" . "/home/yori/Blog/MyJournal1") ("ComputerMemo" . 
"/home/yori/Blog/ComputerMemo") ("CategoryMisc" . 
"/home/yori/Blog/CategoryMisc") ("MyJournal" . "/home/yori/Blog/MyJournal")) 
16803 27329))
  (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()
  (let ((emacs-wiki-journal-use-other-window t)) (emacs-wiki-journal-add-entry))
  emacs-wiki-journal-add-entry-other-window()
  call-interactively(emacs-wiki-journal-add-entry-other-window)

--
Yamagata Yoriyuki