From 8109154312363b497b63497b8785963cd0251cbf Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 16 Oct 1998 19:15:04 +0000 Subject: [PATCH] (next-history-element): Special error message if no default. --- lisp/simple.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) 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) -- 2.39.2