(nnrss-node-text): Don't use char classes.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b677f04..a2eba88 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-05-01  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * nnrss.el (nnrss-node-text): Don't use char classes.
+
 2003-05-01  David Z. Maze  <dmaze@mit.edu>
 
        * nnrss.el (nnrss-find-rss-via-syndic8): Have an `error' branch

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index ced221f..f3fdcbf 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -521,7 +521,7 @@ It is useful when `(setq nnrss-use-local t)'."
                   (nnrss-node-just-text node)
                 node))
         (cleaned-text (if text (gnus-replace-in-string
-                                text "^[[:cntrl:]]+\\|^ +\\| +$" ""))))
+                                text "^[\000-\037\177]+\\|^ +\\| +$" ""))))
     (if (string-equal "" cleaned-text)
        nil
       cleaned-text)))