# HG changeset patch # User Richard M. Stallman # Date 908565304 0 # Node ID d75fa19c5fc08115be02bd3d9fcf4128cdb2072b # Parent b6dbbd2cc3acb09c276fec7522b844fa00650f85 (next-history-element): Special error message if no default. diff -r b6dbbd2cc3ac -r d75fa19c5fc0 lisp/simple.el --- a/lisp/simple.el Fri Oct 16 18:07:03 1998 +0000 +++ b/lisp/simple.el Fri Oct 16 19:15:04 1998 +0000 @@ -783,7 +783,9 @@ (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)