summaryrefslogtreecommitdiff
path: root/lisp/winner.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/winner.el')
-rw-r--r--lisp/winner.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/winner.el b/lisp/winner.el
index e0ef71ad713..752b3f5b4a3 100644
--- a/lisp/winner.el
+++ b/lisp/winner.el
@@ -129,6 +129,11 @@ With arg, turn Winner mode on if and only if arg is positive."
(force-mode-line-update)))
;; Inspired by undo (simple.el)
+
+(defvar winner-pending-undo-ring nil)
+
+(defvar winner-undo-counter nil)
+
(defun winner-undo (arg)
"Switch back to an earlier window configuration saved by Winner mode.
In other words, \"undo\" changes in window configuration."
@@ -147,10 +152,6 @@ In other words, \"undo\" changes in window configuration."
(message "Winner undo (%d)!" winner-undo-counter)
(setq this-command 'winner-undo))))
-(defvar winner-pending-undo-ring nil)
-
-(defvar winner-undo-counter nil)
-
(defun winner-undo-more (count)
"Undo N window configuration changes beyond what was already undone.
Call `winner-undo-start' to get ready to undo recent changes,