From a0c6f682fd4b7553c1156737b3fed28da6b5e2f6 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 12 Apr 2005 08:50:25 +0000 Subject: [PATCH] Synch to No Gnus 200504120812. --- lisp/ChangeLog | 5 +++++ lisp/nnrss.el | 7 +++++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 657b4ae..a138054 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-04-12 Katsumi Yamaoka + + * nnrss.el (nnrss-node-text): Replace CRLFs (which might be + contained in text because xml.el decodes entities) with LFs. + 2005-04-11 Lute Kamstra * nnimap.el (nnimap-date-days-ago): Handle byte-compiler warnings diff --git a/lisp/nnrss.el b/lisp/nnrss.el index d07a5c3..9e8eff6 100644 --- a/lisp/nnrss.el +++ b/lisp/nnrss.el @@ -681,8 +681,11 @@ 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-in-string - text "^[\000-\037\177]+\\|^ +\\| +$" "")))) + (cleaned-text (if text + (gnus-replace-in-string + (gnus-replace-in-string + text "^[\000-\037\177]+\\|^ +\\| +$" "") + "\r\n" "\n")))) (if (string-equal "" cleaned-text) nil cleaned-text))) -- 1.7.10.4