diff lisp/gnus/gnus-win.el @ 30:ec9a17fef872 r19-15b98

Import from CVS: tag r19-15b98
author cvs
date Mon, 13 Aug 2007 08:52:29 +0200
parents 0293115a14e9
children
line wrap: on
line diff
--- a/lisp/gnus/gnus-win.el	Mon Aug 13 08:51:58 2007 +0200
+++ b/lisp/gnus/gnus-win.el	Mon Aug 13 08:52:29 2007 +0200
@@ -64,8 +64,8 @@
 	       (summary 1.0 point)
 	       (if gnus-carpal '(summary-carpal 4))))
     (article
-     (cond 
-      ((and gnus-use-picons 
+     (cond
+      ((and gnus-use-picons
 	    (eq gnus-picons-display-where 'picons))
        '(frame 1.0
 	       (vertical 1.0
@@ -198,7 +198,7 @@
   "Kill all frames Gnus has created."
   (while gnus-created-frames
     (when (frame-live-p (car gnus-created-frames))
-      ;; We slap a condition-case around this `delete-frame' to ensure 
+      ;; We slap a condition-case around this `delete-frame' to ensure
       ;; against errors if we try do delete the single frame that's left.
       (ignore-errors
 	(delete-frame (car gnus-created-frames))))
@@ -225,7 +225,7 @@
 		    (memq setting '(group summary article)))))
       setting
     (let* ((elem
-	    (cond 
+	    (cond
 	     ((eq setting 'group)
 	      (gnus-window-configuration-element
 	       '(group newsgroups ExitNewsgroup)))
@@ -417,7 +417,7 @@
 		;; We want to remove all other windows.
 		(if (not gnus-frame-split-p)
 		    ;; This is not a `frame' split, so we ignore the
-		    ;; other frames.  
+		    ;; other frames.
 		    (delete-other-windows)
 		  ;; This is a `frame' split, so we delete all windows
 		  ;; on all frames.
@@ -439,10 +439,10 @@
 		(when (and (boundp (cdr elem))
 			   (symbol-value (cdr elem)))
 		  (get-buffer (symbol-value (cdr elem))))
-	      (when (cdr elem) 
+	      (when (cdr elem)
 		(get-buffer (cdr elem)))))
 	  gnus-window-to-buffer)))
-    (mapcar 
+    (mapcar
      (lambda (frame)
        (unless (eq (cdr (assq 'minibuffer
 			      (frame-parameters frame)))