[Emacs-diffs] Changes to emacs/lisp/minibuffer.el,v

[Andreas Schwab]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Andreas Schwab <schwab> 08/06/08 14:10:50

Index: minibuffer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/minibuffer.el,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- minibuffer.el       5 Jun 2008 05:44:09 -0000       1.46
+++ minibuffer.el       8 Jun 2008 14:10:50 -0000       1.47
@@ -281,7 +281,10 @@
                     (copy-sequence message)
                   (concat " [" message "]")))
   (when args (setq message (apply 'format message args)))
-  (let ((ol (make-overlay (point-max) (point-max) nil t t)))
+  (let ((ol (make-overlay (point-max) (point-max) nil t t))
+       ;; A quit during sit-for should be (re-)read as
+       ;; abort-recursive-edit
+       (inhibit-quit t))
     (unwind-protect
         (progn
           (unless (zerop (length message))