(gnus-group-customize): Fix typo.

diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el
index 87987e59e49f03ef16ee54ed3e907aaaaffa793f..32dc57d5a912f63065f35d8dfbfe0db16bbcb689 100644 (file)
--- a/lisp/gnus/gnus-cus.el
+++ b/lisp/gnus/gnus-cus.el
@@ -251,23 +251,23 @@ in it..")
 
     (charset (symbol :tag "Charset") "\
 The default charset to use in the group.")
-            
-    (ignored-charsets 
-     (choice :tag "Ignored charsets" 
+
+    (ignored-charsets
+     (choice :tag "Ignored charsets"
             :value nil
             (repeat (symbol))) "\
 List of charsets that should be ignored.
 
 When these charsets are used in the \"charset\" parameter, the
 default charset will be used instead.")
-            
-    (highlight-words 
+
+    (highlight-words
      (choice :tag "Highlight words"
             :value nil
             (repeat (list (regexp :tag "Highlight regexp")
                           (number :tag "Group for entire word" 0)
                           (number :tag "Group for displayed part" 0)
-                          (symbol :tag "Face" 
+                          (symbol :tag "Face"
                                   gnus-emphasis-highlight-words))))
      "highlight regexps.
 See gnus-emphasis-alist.")
@@ -279,8 +279,8 @@ See gnus-emphasis-alist.")
                      (choice :tag "Type"
                              :value nil
                              (const signature)
-                             (const signature-file) 
-                             (const organization) 
+                             (const signature-file)
+                             (const organization)
                              (const address)
                              (const name)
                              (const body))
@@ -297,7 +297,7 @@ DOC is a documentation string for the parameter.")
   '((subscribe (regexp :tag "Subscribe") "\
 If `gnus-subscribe-newsgroup-method' is set to
 `gnus-subscribe-topics', new groups that matches this regexp will
-automatically be subscribed to this topic")) 
+automatically be subscribed to this topic"))
   "Alist of topic parameters that are not also group parameters.
 
 Each entry has the form (NAME TYPE DOC), where NAME is the parameter
@@ -326,14 +326,14 @@ DOC is a documentation string for the parameter.")
                                :doc ,(nth 2 entry)
                                (const :format "" ,(nth 0 entry))
                                ,(nth 1 entry)))
-                      (append gnus-group-parameters 
+                      (append gnus-group-parameters
                               (if group
                                   gnus-extra-group-parameters
                                 gnus-extra-topic-parameters)))))
     (unless (or group topic)
       (error "No group on current line"))
     (when (and group topic)
-      (error "Both a group an topic on current line"))
+      (error "Both a group and topic on current line"))
     (unless (or topic (setq info (gnus-get-info group)))
       (error "Killed group; can't be edited"))
     ;; Ready.