From 04263d23c5890d728cc62fd64873f687adff620c Mon Sep 17 00:00:00 2001 From: Xue Fuqiao Date: Thu, 8 Aug 2013 22:03:56 +0800 Subject: [PATCH] doc/lispref/buffers.texi: Add documentation for ido-record-command(s). * lisp/ido.el (ido-record-command): Add doc string. --- doc/misc/ido.texi | 9 +++++++-- lisp/ChangeLog | 4 ++++ lisp/ido.el | 10 +++++----- 3 files changed, 16 insertions(+), 7 deletions(-) diff --git a/doc/misc/ido.texi b/doc/misc/ido.texi index 48636a9fb92..e0b28e3b2cb 100644 --- a/doc/misc/ido.texi +++ b/doc/misc/ido.texi @@ -631,7 +631,7 @@ fraction of the frame width. @end defvr @defvr {User Option} ido-max-window-height -If the value of this user option is non@code{nil}, its value will +If the value of this user option is non-@code{nil}, its value will override the variable @code{max-mini-window-height}, which is the maximum height for resizing mini-windows (the minibuffer and the echo area). If it's a floating point number, it specifies a fraction of @@ -639,7 +639,12 @@ the mini-window frame's height. If it's an integer, it specifies the number of lines. @end defvr -@c @defvr {User Option} ido-record-commands +@defvr {User Option} ido-record-commands +If the value of this user option is non-@code{nil}, Ido will record +commands in the variable @code{command-history}. Note that non-Ido +equivalent is recorded. +@end defvr + @c @defvr {User Option} ido-enable-last-directory-history @c @defvr {User Option} ido-enable-tramp-completion @c @defvr {User Option} ido-unc-hosts diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6f5469f4d55..6ab96b11327 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2013-08-08 Xue Fuqiao + + * ido.el (ido-record-command): Add doc string. + 2013-08-08 Juanma Barranquero * frameset.el (frameset): Do not disable creation of the default diff --git a/lisp/ido.el b/lisp/ido.el index d3c0e0f09f7..5d017069c5e 100644 --- a/lisp/ido.el +++ b/lisp/ido.el @@ -523,8 +523,8 @@ window with completion alternatives, or `ido-next-match' or (defcustom ido-record-commands t - "Non-nil means that `ido' will record commands in command history. -Note that the non-ido equivalent command is recorded." + "Non-nil means that Ido will record commands in command history. +Note that the non-Ido equivalent command is recorded." :type 'boolean :group 'ido) @@ -1789,10 +1789,10 @@ This function also adds a hook to the minibuffer." (ido-set-current-directory (expand-file-name (or dir "~/")))) (defun ido-record-command (command arg) - ;; Add (command arg) to command-history if ido-record-commands is t - (if ido-record-commands + "Add (COMMAND ARG) to `command-history' if `ido-record-commands' is non-nil." + (if ido-record-commands ; FIXME: use `when' instead of `if'? (let ((cmd (list command arg))) - (if (or (not command-history) + (if (or (not command-history) ; FIXME: ditto (not (equal cmd (car command-history)))) (setq command-history (cons cmd command-history)))))) -- 2.39.2