summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2004-06-13 22:00:17 +0000
committerRichard M. Stallman <rms@gnu.org>2004-06-13 22:00:17 +0000
commit5794c45d21123a031e64626e5966bd7522c63f44 (patch)
treece411ce467cb3081e41b2960eb601b517e178d39 /lisp
parent55391f5e9daed3a9ac4333501fcd7c59de9eab7f (diff)
downloademacs-5794c45d21123a031e64626e5966bd7522c63f44.tar.gz
(previous-matching-history-element): Specify a default.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 2f056e9d462..66bc7c6b2ed 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -953,7 +953,8 @@ See also `minibuffer-history-case-insensitive-variables'."
nil
minibuffer-local-map
nil
- 'minibuffer-history-search-history)))
+ 'minibuffer-history-search-history
+ (car minibuffer-history-search-history))))
;; Use the last regexp specified, by default, if input is empty.
(list (if (string= regexp "")
(if minibuffer-history-search-history