diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-09-12 20:55:34 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-09-12 20:55:34 +0000 |
commit | 54c548db96cd8247cdb0561ee55701c8dc70490b (patch) | |
tree | 8c3d2321cadf6142db4da9aa1831862cda1d10d8 /lisp | |
parent | bb40e751bee9a783decb1b0a80d2775056d46902 (diff) | |
download | emacs-54c548db96cd8247cdb0561ee55701c8dc70490b.tar.gz |
(next-history-element):
Cope if minibuffer-text-before-history is nil.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/simple.el | 2 |
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))))) |