summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1992-03-16 15:23:26 +0000
committerJim Blandy <jimb@redhat.com>1992-03-16 15:23:26 +0000
commit4014fbdecd00bae7501472497fb60473b4b3bf57 (patch)
tree886091f1b608ab17f8caa921161fc3573e85e050 /lisp
parent2f9798cb670d766bf987276a7b36214b3e9d8916 (diff)
downloademacs-4014fbdecd00bae7501472497fb60473b4b3bf57.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index f008094a659..8519219324d 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1,5 +1,5 @@
;; Basic editing commands for Emacs
-;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
;; This file is part of GNU Emacs.
@@ -402,7 +402,8 @@ Repeat this command to undo more changes.
A numeric argument serves as a repeat count."
(interactive "*p")
(let ((modified (buffer-modified-p)))
- (message "Undo!")
+ (or (eq (selected-window) (minibuffer-window))
+ (message "Undo!"))
(or (eq last-command 'undo)
(progn (undo-start)
(undo-more 1)))