# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1034930297 0
# Node ID a2299d46da2acb41101bd7ebaf6590763927e0d0
# Parent  54348dbd8b9c2e4d8b84c527ea64b7c9734683b2
(gnus-group-customize): Fix typo.

diff -r 54348dbd8b9c -r a2299d46da2a lisp/gnus/gnus-cus.el
--- a/lisp/gnus/gnus-cus.el	Fri Oct 18 08:36:59 2002 +0000
+++ b/lisp/gnus/gnus-cus.el	Fri Oct 18 08:38:17 2002 +0000
@@ -251,23 +251,23 @@
 
     (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 @@
  		      (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 @@
   '((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 ,(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.