X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fmule%2Fmule-ccl.el;h=ae0a1882294ed7a13f04bf899b1270f0dbb1337f;hp=b0c44cd85f89c8758ac069bdad65409a69d3b148;hb=afa9772e3fcbb4e80e3e4cfd1a40b4fccc6d08b8;hpb=7de03d6d03b52f49036eed2b6bb488112dc6ab05

diff --git a/lisp/mule/mule-ccl.el b/lisp/mule/mule-ccl.el
index b0c44cd..ae0a188 100644
--- a/lisp/mule/mule-ccl.el
+++ b/lisp/mule/mule-ccl.el
@@ -299,7 +299,7 @@
 
 ;;;###autoload
 (defun ccl-program-p (obj)
-  "T if OBJECT is a valid CCL compiled code."
+  "Return t if OBJECT is a valid CCL compiled code."
   (and (vectorp obj)
        (let ((i 0) (len (length obj)) (flag t))
 	 (if (> len 1)