mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-17 17:58:46 +00:00
Code Issues Releases Activity

gnus-sum.el (gnus-summary-show-article): Don't load shr unconditionally.

Browse Source
This commit is contained in:
Katsumi Yamaoka 2011-12-08 06:22:03 +00:00
parent 76470ad1a0
commit 8b8059decd
2 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View File

@ -1,3 +1,8 @@
2011-12-08 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-sum.el (gnus-summary-show-article): Don't load shr
unconditionally.
2011-12-07 Katsumi Yamaoka <yamaoka@jpl.org>
* message.el (message-pop-to-buffer): Use pop-to-buffer instead of

9
lisp/gnus/gnus-sum.el
View File

@ -9611,9 +9611,12 @@ C-u g', show the raw article."
(when (gnus-summary-goto-subject (cdr gnus-article-current) nil t)
(gnus-summary-update-secondary-mark (cdr gnus-article-current))))))
((not arg)
(require 'shr)
(let ((shr-ignore-cache t))
;; Select the article the normal way.
;; Select the article the normal way.
(if (eq mm-text-html-renderer 'shr)
(progn
(require 'shr)
(let ((shr-ignore-cache t))
(gnus-summary-select-article nil 'force)))
(gnus-summary-select-article nil 'force)))
((equal arg '(16))
;; C-u C-u g