From cb0fd101b90b4721a7498850235427bd890f8be7 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Sat, 7 Sep 2002 06:45:43 +0000 Subject: [PATCH] * emacs-lisp/cl-indent.el (extended-loop-p): Doc fix. * emacs-lisp/find-func.el (find-function-recenter-line): Add custom type. Doc fix. --- lisp/ChangeLog | 7 +++++++ lisp/emacs-lisp/cl-indent.el | 2 +- lisp/emacs-lisp/find-func.el | 5 +++-- 3 files changed, 11 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 038ee40affd..585fd86402c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2002-09-07 John Paul Wallington + + * emacs-lisp/cl-indent.el (extended-loop-p): Doc fix. + + * emacs-lisp/find-func.el (find-function-recenter-line): Add + custom type. Doc fix. + 2002-09-06 Stefan Monnier * menu-bar.el (menu-bar-make-mm-toggle): New macro. diff --git a/lisp/emacs-lisp/cl-indent.el b/lisp/emacs-lisp/cl-indent.el index 2ed810951d9..3bdb3382bc1 100644 --- a/lisp/emacs-lisp/cl-indent.el +++ b/lisp/emacs-lisp/cl-indent.el @@ -108,7 +108,7 @@ If nil, indent backquoted lists as data, i.e., like quoted lists." (defun extended-loop-p (loop-start) - "True if an extended loop form starta at LOOP-START." + "True if an extended loop form starts at LOOP-START." (condition-case () (save-excursion (goto-char loop-start) diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index 1225333ed26..6e491409233 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el @@ -97,8 +97,9 @@ default." (defcustom find-function-recenter-line 1 "The window line-number from which to start displaying a symbol definition. A value of nil implies center the beginning of the definition. -See the function `center-to-window-line' for more information, and -`find-function' and `find-variable'." +See `find-function' and `find-variable'." + :type '(choice (const :tag "Center" nil) + integer) :group 'find-function :version "20.3") -- 2.39.2