mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-13 11:12:19 -08:00
Code Issues Projects Releases Wiki Activity

(next-history-element):

Browse source 
Cope if minibuffer-text-before-history is nil.
This commit is contained in:
Richard M. Stallman 1997-09-12 20:55:34 +00:00
parent bb40e751be
commit 54c548db96
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/simple.el
View file

@ -723,7 +723,7 @@ If N is negative, find the previous or Nth previous match."
(cond ((= narg -1)
(setq elt minibuffer-default))
((= narg 0)
(setq elt minibuffer-text-before-history)
(setq elt (or minibuffer-text-before-history ""))
(setq minibuffer-text-before-history nil))
(t (setq elt (nth (1- minibuffer-history-position)
(symbol-value minibuffer-history-variable)))))