From 301f6b87c1e9fdd6b3a6c236a4bdc64853bde311 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Wed, 4 Jun 2008 13:42:34 +0000 Subject: [PATCH] (define-ccl-program): Add `doc-string' declaration. --- lisp/ChangeLog | 3 +++ lisp/international/ccl.el | 1 + 2 files changed, 4 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9bd20fc9956..c48d3c7e23e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,9 @@ * echistory.el (electric-history-map): Define within defvar. Add docstring. + * international/ccl.el (define-ccl-program): Add `doc-string' + declaration. + 2008-06-04 Juanma Barranquero * face-remap.el (variable-pitch-mode): Reflow docstrings. diff --git a/lisp/international/ccl.el b/lisp/international/ccl.el index e1fb658f860..bd4d7373b2f 100644 --- a/lisp/international/ccl.el +++ b/lisp/international/ccl.el @@ -1304,6 +1304,7 @@ Optional arg VECTOR is a compiled CCL code of the CCL program." ;;;###autoload (defmacro define-ccl-program (name ccl-program &optional doc) + (declare (doc-string 3)) "Set NAME the compiled code of CCL-PROGRAM. CCL-PROGRAM has this form: -- 2.11.4.GIT