From b4587710d34b1deeb4b3a965031f1dcd8eaad223 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Fri, 11 Sep 2009 22:59:36 +0000 Subject: [PATCH] * emacs-lisp/cl-macs.el (help-add-fundoc-usage): Declare. --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/cl-loaddefs.el | 2 +- lisp/emacs-lisp/cl-macs.el | 2 ++ 3 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 72e1da01396..45f6e33c5a5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-09-11 Juanma Barranquero + + * emacs-lisp/cl-macs.el (help-add-fundoc-usage): Declare. + 2009-09-11 Daiki Ueno * epg.el (epg-cipher-algorithm-alist): Add CAMELLIA. diff --git a/lisp/emacs-lisp/cl-loaddefs.el b/lisp/emacs-lisp/cl-loaddefs.el index 8aa44a254e7..2e1bc2b05f8 100644 --- a/lisp/emacs-lisp/cl-loaddefs.el +++ b/lisp/emacs-lisp/cl-loaddefs.el @@ -282,7 +282,7 @@ Not documented ;;;;;; do-all-symbols do-symbols dotimes dolist do* do loop return-from ;;;;;; return block etypecase typecase ecase case load-time-value ;;;;;; eval-when destructuring-bind function* defmacro* defun* gentemp -;;;;;; gensym) "cl-macs" "cl-macs.el" "2aecc3d85778ca624e541d08032aa12a") +;;;;;; gensym) "cl-macs" "cl-macs.el" "cee0f106d963d8d1665bc67bea707297") ;;; Generated autoloads from cl-macs.el (autoload 'gensym "cl-macs" "\ diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 1a8f1b18e6e..952c86740f5 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -230,6 +230,8 @@ It is a list of elements of the form either: (defvar bind-block) (defvar bind-defs) (defvar bind-enquote) (defvar bind-inits) (defvar bind-lets) (defvar bind-forms) +(declare-function help-add-fundoc-usage "help-fns" (docstring arglist)) + (defun cl-transform-lambda (form bind-block) (let* ((args (car form)) (body (cdr form)) (orig-args args) (bind-defs nil) (bind-enquote nil) -- 2.39.2