summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-09-12 20:55:34 +0000
committerRichard M. Stallman <rms@gnu.org>1997-09-12 20:55:34 +0000
commit54c548db96cd8247cdb0561ee55701c8dc70490b (patch)
tree8c3d2321cadf6142db4da9aa1831862cda1d10d8 /lisp
parentbb40e751bee9a783decb1b0a80d2775056d46902 (diff)
downloademacs-54c548db96cd8247cdb0561ee55701c8dc70490b.tar.gz
(next-history-element):
Cope if minibuffer-text-before-history is nil.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 798a706886e..6bb122646b1 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -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)))))