Mercurial > emacs

diff lisp/gnus/gnus-html.el @ 110682:ba6a1c230532

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gnus-html.el (gnus-html-prefetch-images): Adjust regexp to avoid regexp backtrace overflows.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 01 Oct 2010 13:33:03 +0000
parents 8ce8af5eb5e3
children 74bad2d7bddd
line wrap: on
line diff
--- a/lisp/gnus/gnus-html.el	Fri Oct 01 06:06:44 2010 -0700
+++ b/lisp/gnus/gnus-html.el	Fri Oct 01 13:33:03 2010 +0000
@@ -500,7 +500,7 @@
     (let ((blocked-images (with-current-buffer summary
                             gnus-blocked-images)))
       (save-match-data
-	(while (re-search-forward "<img.*src=[\"']\\([^\"']+\\)" nil t)
+	(while (re-search-forward "<img[^>]+src=[\"']\\([^\"']+\\)" nil t)
 	  (let ((url (gnus-html-encode-url (match-string 1))))
 	    (unless (gnus-html-image-url-blocked-p url blocked-images)
               (when (gnus-html-cache-expired url gnus-html-image-cache-ttl)