--- gnus-art.el 2005-11-28 09:37:06.000000000 -0500 +++ gnus-art.el.new 2005-12-01 12:51:02.000000000 -0500 @@ -2494,7 +2494,9 @@ (goto-char (point-min)) (while (re-search-forward "\\(\\(https?\\|ftp\\)://\\S-+\\) *\n\\(\\S-+\\)" nil t) - (replace-match "\\1\\3" t))) + (if (save-match-data + (not (string-match "^\\(https?\\|ftp\\):" (match-string 3)))) + (replace-match "\\1\\3" t)))) (when (interactive-p) (gnus-treat-article nil))))