Mercurial > emacs

diff lisp/simple.el @ 19888:45a077538366

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(next-history-element): Cope if minibuffer-text-before-history is nil.
author Richard M. Stallman <rms@gnu.org>
date Fri, 12 Sep 1997 20:55:34 +0000
parents 9f6b375ce842
children c9ed682ff86f
line wrap: on
line diff
--- a/lisp/simple.el	Fri Sep 12 19:53:33 1997 +0000
+++ b/lisp/simple.el	Fri Sep 12 20:55:34 1997 +0000
@@ -723,7 +723,7 @@
 	(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)))))