Doc fixes.

diff --git a/lisp/winner.el b/lisp/winner.el
index dfc93a2a707527709bc8ab9e9f11dd5a6c3a3a58..ff09b3a3fc90792e97f25a5c1b79fb5748960972 100644 (file)
--- a/lisp/winner.el
+++ b/lisp/winner.el
@@ -84,12 +84,11 @@ In the default case (CTRL-SPACE) the mark will be set.")
     ".newsrc-dribble",
     "*Completions*",
     "*Buffer list*")
-  "Exclude these buffer names
-from any \(Winner mode\) list of buffers.")
+  "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.
+  "Winner excludes buffers with names matching any of these regexps.
+They are not included in any Winner mode list of buffers.
 
 By default `winner-skip-regexps' is set to \(\"^ \"\),
 which excludes \"invisible buffers\".")
@@ -192,9 +191,6 @@ With arg, turn Winner mode on if and only if arg is positive."
                winner-stacks)
          (list config))))))
 
-
-
-\f
 ;; Push this window configuration on the right stack,
 ;; but make sure the stack doesn't get too large etc...
 (defun winner-push (config frame)
@@ -208,17 +204,9 @@ With arg, turn Winner mode on if and only if arg is positive."
        (setf   (winner-stack-place this)
                (winner-stack-data  this))
        (setf   (winner-stack-count this) 1)))))
-
-
-
-
-
-
-
-
+\f
 ;;;; Selecting a window configuration
 
-
 ;; Return list of names of other buffers, excluding the current buffer
 ;; and buffers specified by the user.
 (defun winner-other-buffers ()
@@ -231,10 +219,7 @@ With arg, turn Winner mode on if and only if arg is positive."
                         finally return nil))
        collect name))
 
-
-
 (defun winner-select (&optional arg)
-
   "Change to previous or new window configuration.
 With arg start at position 1 if arg is positive, and
 at -1 if arg is negative;  else start at position 0.
@@ -249,7 +234,7 @@ Winner mode must be turned on.\)"
         ((< (prefix-numeric-value arg) 0) winner-prev-event)
         (t nil)))
   (if arg (push arg unread-command-events))
-\f
+
   (let ((stack (winner-stack (selected-frame)))
        (store nil)
        (buffers (winner-other-buffers))
@@ -309,10 +294,6 @@ Winner mode must be turned on.\)"
       ;; Else update the buffer list and make sure that the displayed
       ;; buffer is the same as the current buffer.
       (switch-to-buffer (window-buffer)))))
-\f                                         
-                                          
-
-
 
 (defun winner-previous ()
   "Change to previous window configuration."
@@ -323,10 +304,7 @@ Winner mode must be turned on.\)"
   "Change to new window configuration."
   (interactive)
   (winner-select 1))
-
-
-
-
+\f
 ;;;; To be evaluated when the package is loaded:
 
 (unless winner-mode-map