aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKatsumi Yamaoka2010-09-04 00:50:02 +0000
committerKatsumi Yamaoka2010-09-04 00:50:02 +0000
commit74d8321d0e95a2ea98d31a608fda7deff08a4759 (patch)
treee0e405e09f925d1a9c33a6835454d11c9a0efc55
parenteecdcaf581984698081637f2f8ce0f0a0f701de0 (diff)
downloademacs-74d8321d0e95a2ea98d31a608fda7deff08a4759.tar.gz
emacs-74d8321d0e95a2ea98d31a608fda7deff08a4759.zip
Fix previous merge from Gnus trunk.
-rw-r--r--lisp/gnus/gnus-html.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el
index 1e6cdc5c9b7..e14d109d6ed 100644
--- a/lisp/gnus/gnus-html.el
+++ b/lisp/gnus/gnus-html.el
@@ -111,7 +111,6 @@ fit these criteria."
111 111
112(defun gnus-html-wash-tags () 112(defun gnus-html-wash-tags ()
113 (let (tag parameters string start end images url) 113 (let (tag parameters string start end images url)
114 (mm-url-decode-entities)
115 (goto-char (point-min)) 114 (goto-char (point-min))
116 (while (re-search-forward " *<pre_int> *</pre_int>\n" nil t) 115 (while (re-search-forward " *<pre_int> *</pre_int>\n" nil t)
117 (replace-match "" t t)) 116 (replace-match "" t t))
@@ -223,7 +222,8 @@ fit these criteria."
223 (while (re-search-forward "</pre_int>" nil t) 222 (while (re-search-forward "</pre_int>" nil t)
224 (replace-match "" t t)) 223 (replace-match "" t t))
225 (when images 224 (when images
226 (gnus-html-schedule-image-fetching (current-buffer) (nreverse images))))) 225 (gnus-html-schedule-image-fetching (current-buffer) (nreverse images)))
226 (mm-url-decode-entities)))
227 227
228(defun gnus-html-insert-image () 228(defun gnus-html-insert-image ()
229 "Fetch and insert the image under point." 229 "Fetch and insert the image under point."