-;;
-;; winner.el provides a minor mode (`winner-mode') that does
-;; essentially two things:
-;;
-;; 1) It keeps track of changing window configurations, so that
-;; when you wish to go back to a previous view, all you have
-;; to do is to press C-left a couple of times.
-;;
-;; 2) It lets you switch to other buffers by pressing C-right.
-;;
-;; To use Winner mode, put this line in your .emacs file:
-;;
-;; (add-hook 'after-init-hook (lambda () (winner-mode 1)))
-\f
-;; Details:
-;;
-;; 1. You may of course decide to use other bindings than those
-;; mentioned above. Just set these variables in your .emacs:
-;;
-;; `winner-prev-event'
-;; `winner-next-event'
-;;
-;; 2. When you have found the view of your choice
-;; (using your favourite keys), you may press ctrl-space
-;; (`winner-max-event') to `delete-other-windows'.
-;;
-;; 3. Winner now keeps one configuration stack for each frame.
-;;
-;;
-;;
-;; Yours sincerely, Ivar Rummelhoff
-;;
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-
-;;; Code:
-
-
-
-;;;; Variables you may want to change
-
-(defvar winner-prev-event 'C-left
- "Winner mode binds this event to the command `winner-previous'.")
-
-(defvar winner-next-event 'C-right
- "Winner mode binds this event to the command `winner-next'.")
-
-(defvar winner-max-event 67108896 ; CTRL-space
- "Event for deleting other windows
-after having selected a view with Winner.
-
-The normal functions of this event will also be performed.
-In the default case (CTRL-SPACE) the mark will be set.")
-
-(defvar winner-skip-buffers
- '("*Messages*",
- "*Compile-Log*",
- ".newsrc-dribble",
- "*Completions*",
- "*Buffer list*")
- "Exclude these buffer names
-from any \(Winner mode\) list of buffers.")
-
-(defvar winner-skip-regexps '("^ ")
- "Exclude buffers with names matching any of these regexps.
-..from any \(Winner mode\) list of buffers.
-
-By default `winner-skip-regexps' is set to \(\"^ \"\),
-which excludes \"invisible buffers\".")
-
-\f
-(defvar winner-limit 50
- "Winner will save no more than 2 * `winner-limit' window configurations.
-\(.. and no less than `winner-limit'.\)")
-
-(defvar winner-mode-hook nil
- "Functions to run whenever Winner mode is turned on.")
-
-(defvar winner-mode-leave-hook nil
- "Functions to run whenever Winner mode is turned off.")
-
-(defvar winner-dont-bind-my-keys nil
- "If non-nil: Do not use `winner-mode-map' in Winner mode.")
-