* lisp/gnus/nnmairix.el (nnmairix-replace-illegal-chars): Drop Emacs 20 code.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 24f71d5a6749720be23f5f81e24174aadf518ba9..446d3877d319094bcb7bee470d6ea8b4db022235 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,7 @@
 2010-10-03  Glenn Morris  <rgm@gnu.org>
 
+       * nnmairix.el (nnmairix-replace-illegal-chars): Drop Emacs 20 code.
+
        * smime.el (smime-cert-by-ldap-1): Drop Emacs 21 code.
 
        * gnus-art.el (gnus-next-page-map): Drop Emacs 20 compat cruft.

diff --git a/lisp/gnus/nnmairix.el b/lisp/gnus/nnmairix.el
index 9672c04b494dc304f4a36fc497139ac13829ba1d..0b7f0a40bd3b364f3e22f06bfbc50f1a0885264a 100644 (file)
--- a/lisp/gnus/nnmairix.el
+++ b/lisp/gnus/nnmairix.el
@@ -1572,14 +1572,11 @@ See %s for details" proc nnmairix-mairix-output-buffer)))
 (defun nnmairix-replace-illegal-chars (header)
   "Replace illegal characters in HEADER for mairix query."
   (when header
-    (if (> emacs-major-version 20)
-       (while (string-match "[^-.@/,& [:alnum:]]" header)
-         (setq header (replace-match "" t t header)))
-      (while (string-match "[[]{}:<>]" header)
-       (setq header (replace-match "" t t header))))
+    (while (string-match "[^-.@/,& [:alnum:]]" header)
+      (setq header (replace-match "" t t header)))
     (while (string-match "[-& ]" header)
       (setq header (replace-match "," t t header)))
-  header))
+    header))
 
 (defun nnmairix-group-toggle-parameter (group parameter description &optional par)
   "Toggle on GROUP a certain PARAMETER.