From: ueno <ueno>
Date: Sun, 21 Jan 2007 04:03:19 +0000 (+0000)
Subject: Fixed a typo.
X-Git-Tag: riece-3_1_2~29
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=005b6ff058be7fcdaab3373304bea2925c7efb94;p=elisp%2Friece.git

Fixed a typo.
---

diff --git a/lisp/riece-mcat.el b/lisp/riece-mcat.el
index f8bfc6d..0e3f250 100644
--- a/lisp/riece-mcat.el
+++ b/lisp/riece-mcat.el
@@ -89,7 +89,7 @@
 	    (delete-region (point) (progn (forward-sexp) (point))))
 	(set mcat-alist-symbol nil))
       (setq alist (riece-mcat-extract files (symbol-value mcat-alist-symbol)))
-      (insert "(defconst " (symbol-name mcat-alist) "\n  '(")
+      (insert "(defconst " (symbol-name mcat-alist-symbol) "\n  '(")
       (while alist
 	(insert "(" (pp-to-string (car (car alist))) " . "
 		(pp-to-string (cdr (car alist))) ")")