projects / elisp / riece.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: bcdd299)
Fixed.
authorueno <ueno>
Mon, 22 Jan 2007 06:21:31 +0000 (06:21 +0000)
committerueno <ueno>
Mon, 22 Jan 2007 06:21:31 +0000 (06:21 +0000)
lisp/riece-mcat.el patch | blob | history

diff --git a/lisp/riece-mcat.el b/lisp/riece-mcat.el
index 3155b5c..5bfc62e 100644 (file)
--- a/lisp/riece-mcat.el
+++ b/lisp/riece-mcat.el
@@ -87,7 +87,8 @@
            (delete-region (point) (progn (forward-sexp) (point))))
        (set mcat-alist-symbol nil))
       (setq alist (mapcar (lambda (message)
-                           (or (assoc message (symbol-name mcat-alist-symbol))
+                           (or (assoc message
+                                      (symbol-value mcat-alist-symbol))
                                (list message)))
                          (riece-mcat-extract files)))
       (insert "(defconst " (symbol-name mcat-alist-symbol) "\n  '(")