Commit 71e40adf authored by Jim Blandy's avatar Jim Blandy
Browse files

*** empty log message ***

parent c810ea90
;; 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)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment