From: Richard M. Stallman Date: Fri, 16 Oct 1998 19:15:04 +0000 (+0000) Subject: (next-history-element): Special error message if no default. X-Git-Tag: emacs-20.4~1477 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8109154312363b497b63497b8785963cd0251cbf;p=emacs.git (next-history-element): Special error message if no default. --- diff --git a/lisp/simple.el b/lisp/simple.el index 54e91112069..24e7597ff4d 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -783,7 +783,9 @@ An uppercase letter in REGEXP makes the search case-sensitive." (null minibuffer-text-before-history)) (setq minibuffer-text-before-history (buffer-string))) (if (< narg minimum) - (error "End of history; no next item")) + (if minibuffer-default + (error "End of history; no next item") + (error "End of history; no default available"))) (if (> narg (length (symbol-value minibuffer-history-variable))) (error "Beginning of history; no preceding item")) (erase-buffer)