diff options
author | Karl Heuer <kwzh@gnu.org> | 1997-10-16 23:25:57 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1997-10-16 23:25:57 +0000 |
commit | ac1f790ac66dbdbb23375a7f44761d9d026fe3ff (patch) | |
tree | 0e2a8755723ba50057ed57c46b605c022557af14 /lisp/winner.el | |
parent | 5b531322941e4683531cb679b8ae40cd43674308 (diff) | |
download | emacs-ac1f790ac66dbdbb23375a7f44761d9d026fe3ff.tar.gz |
(winner-pending-undo-ring): Defvar before first use.
(winner-undo-counter): Likewise.
Diffstat (limited to 'lisp/winner.el')
-rw-r--r-- | lisp/winner.el | 9 |
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, |