summaryrefslogtreecommitdiff
path: root/lisp/simple.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2015-03-11 10:54:56 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2015-03-11 10:54:56 -0400
commit41bba4b40f6e07924a3681ffeabb26ca48424095 (patch)
tree4e2ee779f139c90df2ba8a69da111793bd2ad629 /lisp/simple.el
parentf0e8673a9e708fc0ba6c092ec2fc777efbb4bb23 (diff)
* lisp/simple.el (goto-history-element): Don't burp on t history.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r--lisp/simple.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 1e64f998fd4..4deb4cfce2e 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1940,7 +1940,9 @@ The argument NABS specifies the absolute history position."
(user-error (if minibuffer-default
"End of defaults; no next item"
"End of history; no default available")))
- (if (> nabs (length (symbol-value minibuffer-history-variable)))
+ (if (> nabs (if (listp (symbol-value minibuffer-history-variable))
+ (length (symbol-value minibuffer-history-variable))
+ 0))
(user-error "Beginning of history; no preceding item"))
(unless (memq last-command '(next-history-element
previous-history-element))