2002-04-15 Jesper Harder <harder@ifa.au.dk>

	* gnus-art.el (article-unsplit-urls): Allow trailing SPC.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 64911e4..ec821f4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -7,6 +7,10 @@
        (nnkiboze-generate-group): Set newsrc to the *highest* article
        number kibozed, not the lowest.
        
+2002-04-15  Jesper Harder  <harder@ifa.au.dk>
+
+       * gnus-art.el (article-unsplit-urls): Allow trailing SPC.
+
 2002-04-24  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
        From Dan Christensen <jdc+news@uwo.ca>.
 

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 4a69e15..b57edb6 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -2081,7 +2081,7 @@ If READ-CHARSET, ask for a coding system."
     (let ((buffer-read-only nil))
       (goto-char (point-min))
       (while (re-search-forward
-             "^\\(\\(https?\\|ftp\\)://\\S-+\\)\n\\(\\S-+\\)" nil t)
+             "^\\(\\(https?\\|ftp\\)://\\S-+\\) *\n\\(\\S-+\\)" nil t)
        (replace-match "\\1\\3" t)))))
 
 (defun article-wash-html (&optional read-charset)