Mercurial > emacs
changeset 20086:92b4edaf6482
(winner-pending-undo-ring): Defvar before first use.
(winner-undo-counter): Likewise.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 16 Oct 1997 23:25:57 +0000 |
parents | 05408326bad6 |
children | 3a72c0f0ad69 |
files | lisp/winner.el |
diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/winner.el Thu Oct 16 23:21:13 1997 +0000 +++ b/lisp/winner.el Thu Oct 16 23:25:57 1997 +0000 @@ -129,6 +129,11 @@ (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 @@ (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,