*** empty log message ***
[gnus] / lisp / gnus-win.el
index d0fc36b..d66d0c5 100644 (file)
@@ -25,6 +25,8 @@
 
 ;;; Code:
 
+(eval-when-compile (require 'cl))
+
 (require 'gnus)
 
 (defgroup gnus-windows nil
      (vertical 1.0
               (article 0.5)
               (message 1.0 point)))
-    (draft
-     (vertical 1.0
-              (draft 1.0 point)))
     (pipe
      (vertical 1.0
               (summary 0.25 point)
      (vertical 1.0
               (summary 0.5 point)
               ("*Score Words*" 1.0)))
+    (category
+     (vertical 1.0
+              (category 1.0)))
     (compose-bounce
      (vertical 1.0
               (article 0.5)
@@ -184,6 +186,7 @@ See the Gnus manual for an explanation of the syntax used.")
     (tree . gnus-tree-buffer)
     (score-trace . "*Score Trace*")
     (info . gnus-info-buffer)
+    (category . gnus-category-buffer)
     (article-copy . gnus-article-copy)
     (draft . gnus-draft-buffer))
   "Mapping from short symbols to buffer names or buffer variables.")