Stricter test.

[gnus] / lisp / webmail.el

diff --git a/lisp/webmail.el b/lisp/webmail.el
index 2110624..5a845c5 100644 (file)
--- a/lisp/webmail.el
+++ b/lisp/webmail.el
@@ -314,7 +314,7 @@
   "Redirect refresh url in META."
   (goto-char (point-min))
   (while (re-search-forward 
-         "HTTP-EQUIV=\"Refresh\"[^>]*URL=\\([^\"]+\\)\""
+         "<meta[ \t\r\n]*http-equiv=\"Refresh\"[^>]*URL=\\([^\"]+\\)\""
          nil t)
     (let ((url (match-string 1)))
       (erase-buffer)