diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2021-04-19 08:20:50 +0200 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-04-19 14:25:32 -0400 |
| commit | 077dae3b4ca6a534a0c8061f7b5cf81639e39c3b (patch) | |
| tree | 2547f481dc65027efd75d90683672be7c2d7dc4b /lisp | |
| parent | 0a4dc70830f5e8286b47120cabc750cca07a75c1 (diff) | |
| download | emacs-077dae3b4ca6a534a0c8061f7b5cf81639e39c3b.tar.gz emacs-077dae3b4ca6a534a0c8061f7b5cf81639e39c3b.tar.bz2 emacs-077dae3b4ca6a534a0c8061f7b5cf81639e39c3b.zip | |
completing-read: If HIST is the symbol `t', history is not recorded.
* lisp/minibuffer.el (completion-all-sorted-completions): Check if
`minibuffer-history-variable` is `t`
* src/minibuf.c (completing-read): Update docstring
* doc/lispref/minibuf.texi: Update documentation of
`read-from-minibuffer` and `completing-read`
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/minibuffer.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index c900b0d7ce6..06a5e1e988c 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -1390,7 +1390,7 @@ scroll the window of possible completions." (t ;; Prefer shorter completions, by default. (setq all (sort all (lambda (c1 c2) (< (length c1) (length c2))))) - (if (minibufferp) + (if (and (minibufferp) (not (eq minibuffer-history-variable t))) ;; Prefer recently used completions and put the default, if ;; it exists, on top. (let ((hist (symbol-value minibuffer-history-variable))) |