From 3809ed936517237a18ced65239b650b2d1011d60 Mon Sep 17 00:00:00 2001
From: ueno <ueno>
Date: Fri, 26 Aug 2005 05:10:02 +0000
Subject: [PATCH] Use defconst instead of defvar to define *-description.

---
 lisp/riece-ctlseq.el |    2 +-
 lisp/riece-kakasi.el |    2 +-
 lisp/riece-yank.el   |    2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

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)
-- 
1.7.10.4