From 72ded5e106e8b168768073333b5703e7a115dc58 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 24 Apr 2003 23:12:47 +0000 Subject: [PATCH] Synch to Oort Gnus 200304242314. --- lisp/ChangeLog | 5 +++++ lisp/nnrss.el | 10 +++++----- 2 files changed, 10 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bd9aca0..123475d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-04-25 Simon Josefsson + + * nnrss.el (nnrss-node-text): Don't use a star. + (nnrss-node-text): Use g-r-i-s, not g-r-r-i-s which doesn't exist. + 2003-04-24 Dave Love * qp.el (quoted-printable-decode-region): Use mm-insert-byte. diff --git a/lisp/nnrss.el b/lisp/nnrss.el index 161d88b..5cc9069 100644 --- a/lisp/nnrss.el +++ b/lisp/nnrss.el @@ -518,12 +518,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 (gnus-replace-regexp-in-string - (gnus-replace-regexp-in-string - (gnus-replace-regexp-in-string + (cleaned-text (if text (gnus-replace-in-string + (gnus-replace-in-string + (gnus-replace-in-string text "^[[:cntrl:]]+" "") - "^ *" "") - " *$" "")))) + "^ +" "") + " +$" "")))) (if (string-equal "" cleaned-text) nil cleaned-text))) -- 1.7.10.4