From: ueno <ueno>
Date: Fri, 26 Aug 2005 05:10:02 +0000 (+0000)
Subject: Use defconst instead of defvar to define *-description.
X-Git-Tag: channel-coding-branchpoint~71
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3809ed936517237a18ced65239b650b2d1011d60;p=elisp%2Friece.git

Use defconst instead of defvar to define *-description.
---

diff --git a/lisp/riece-ctlseq.el b/lisp/riece-ctlseq.el
index fa8117f..66492eb 100644
--- a/lisp/riece-ctlseq.el
+++ b/lisp/riece-ctlseq.el
@@ -59,7 +59,7 @@
 
 (defvar riece-ctlseq-enabled nil)
 
-(defvar riece-ctlseq-description
+(defconst riece-ctlseq-description
   "Mark up control sequences in IRC buffers.")
 
 (defun riece-ctlseq-compatible-attributes-p (this other)
diff --git a/lisp/riece-kakasi.el b/lisp/riece-kakasi.el
index 9d5f13a..d1fc363 100644
--- a/lisp/riece-kakasi.el
+++ b/lisp/riece-kakasi.el
@@ -30,7 +30,7 @@
 
 (defvar riece-kakasi-enabled nil)
 
-(defvar riece-kakasi-description
+(defconst riece-kakasi-description
   "Convert Japanese to roman string by KAKASI.")
 
 (defvar riece-kakasi-process nil)
diff --git a/lisp/riece-yank.el b/lisp/riece-yank.el
index d959c32..a2ecf3a 100644
--- a/lisp/riece-yank.el
+++ b/lisp/riece-yank.el
@@ -43,7 +43,7 @@ before/after the first/last non-blank line."
   :type 'boolean
   :group 'riece-yank)
 
-(defvar riece-yank-description
+(defconst riece-yank-description
   "Enter the element of kill-ring.")
 
 (defvar riece-yank-enabled nil)