* gnus.el (gnus-expand-group-parameters): Match \N or \& only.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9afffd3..3e8d683 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-01-09  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * gnus.el (gnus-expand-group-parameters): Match \N or \& only.
+
 2002-01-08  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * mm-encode.el (mm-content-transfer-encoding-defaults): Add

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 95acf36..781186a 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -2871,7 +2871,7 @@ You should probably use `gnus-find-method-for-group' instead."
   (let (new)
     (dolist (elem parameters)
       (if (and (stringp (cdr elem))
-              (string-match "\\\\" (cdr elem)))
+              (string-match "\\\\[0-9&]" (cdr elem)))
          (push (cons (car elem)
                      (gnus-expand-group-parameter match (cdr elem) group))
                new)