changeset 1838:34da3c151be4

Restore nuked information in minibuffer history bindings. Use intelligent method of disabling completion-oriented bindings.
author Roland McGrath <roland@gnu.org>
date Fri, 05 Feb 1993 17:41:42 +0000
parents 0b79cade13e3
children e10cdcb857d2
files lisp/simple.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Fri Feb 05 02:06:38 1993 +0000
+++ b/lisp/simple.el	Fri Feb 05 17:41:42 1993 +0000
@@ -442,7 +442,7 @@
 	      ;; history commands which rms turned off since they seem to
 	      ;; do things he doesn't like.
 	      (if (and (cdr keymap-and-completionp) nil) ;XXX turned off
-		  (cdr command)
+		  (progn (error "EMACS BUG!") (cdr command))
 		(car command))
 	    command))))
     '((minibuffer-local-map . nil)
@@ -450,10 +450,10 @@
       (minibuffer-local-completion-map . t)
       (minibuffer-local-must-match-map . t)
       (read-expression-map . nil))))
- '(("\en" . (next-history-element . next-history-element))
-   ([next] . (next-history-element . next-history-element))
-   ("\ep" . (previous-history-element . previous-history-element))
-   ([prior] . (previous-history-element . previous-history-element))
+ '(("\en" . (next-history-element . next-complete-history-element))
+   ([next] . (next-history-element . next-complete-history-element))
+   ("\ep" . (previous-history-element . previous-complete-history-element))
+   ([prior] . (previous-history-element . previous-complete-history-element))
    ("\er" . previous-matching-history-element)
    ("\es" . next-matching-history-element)))