(nnrss-node-text): Ditto.

[gnus] / lisp / nnrss.el

diff --git a/lisp/nnrss.el b/lisp/nnrss.el
index 4eefba0..bb238f2 100644 (file)
--- a/lisp/nnrss.el
+++ b/lisp/nnrss.el
@@ -514,11 +514,12 @@ It is useful when `(setq nnrss-use-local t)'."
         (text (if (and node (listp node))
                   (nnrss-node-just-text node)
                 node))
-        (cleaned-text (if text
-                          (replace-regexp-in-string 
-                           " *$" "" (replace-regexp-in-string
-                                     "^ *" "" (replace-regexp-in-string
-                                               "^[[:cntrl:]]+" "" text))))))
+        (cleaned-text (if text (gnus-replace-regexp-in-string
+                                (gnus-replace-regexp-in-string
+                                 (gnus-replace-regexp-in-string
+                                  text "^[[:cntrl:]]+" "")
+                                 "^ *" "")
+                                " *$" ""))))
     (if (string-equal "" cleaned-text)
        nil
       cleaned-text)))