X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-art.el;h=0c2c6c7f73e25faf6df243c0ae36eaf0beafb2ab;hb=e23d2c938942d89bb02cdb90bcb399c5c0376471;hp=a90a14c3d5ce37e904ca3c4ffcce58a8c744c602;hpb=4bde6f833256381705dbf81233e2ff5bf1bc9a8e;p=elisp%2Fgnus.git- diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index a90a14c..0c2c6c7 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -2548,12 +2548,10 @@ If READ-CHARSET, ask for a coding system." (defun gnus-article-wash-html-with-w3m () "Wash the current buffer with emacs-w3m." (mm-setup-w3m) + (set (make-local-variable 'w3m-safe-url-regexp) mm-w3m-safe-url-regexp) (save-restriction (narrow-to-region (point) (point-max)) - (let ((w3m-safe-url-regexp (if mm-inline-text-html-with-images - nil - "\\`cid:")) - w3m-force-redisplay) + (let (w3m-force-redisplay) (w3m-region (point-min) (point-max))) (when (and mm-inline-text-html-with-w3m-keymap (boundp 'w3m-minor-mode-map)