# HG changeset patch # User Jim Blandy # Date 700759406 0 # Node ID a9c4bc19b2aa4615a227dd5707658ba7f56c17c2 # Parent e7dd969ff98b773f667a11cd04446c81e7186908 *** empty log message *** diff -r e7dd969ff98b -r a9c4bc19b2aa lisp/simple.el --- a/lisp/simple.el Mon Mar 16 06:13:09 1992 +0000 +++ b/lisp/simple.el Mon Mar 16 15:23:26 1992 +0000 @@ -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 @@ 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)))