diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-03-11 10:54:56 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-03-11 10:54:56 -0400 |
commit | 41bba4b40f6e07924a3681ffeabb26ca48424095 (patch) | |
tree | 4e2ee779f139c90df2ba8a69da111793bd2ad629 /lisp/simple.el | |
parent | f0e8673a9e708fc0ba6c092ec2fc777efbb4bb23 (diff) |
* lisp/simple.el (goto-history-element): Don't burp on t history.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r-- | lisp/simple.el | 4 |
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)) |