Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
8b8059de
Commit
8b8059de
authored
Dec 08, 2011
by
Katsumi Yamaoka
Browse files
gnus-sum.el (gnus-summary-show-article): Don't load shr unconditionally.
parent
76470ad1
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
11 additions
and
3 deletions
+11
-3
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+5
-0
lisp/gnus/gnus-sum.el
lisp/gnus/gnus-sum.el
+6
-3
No files found.
lisp/gnus/ChangeLog
View file @
8b8059de
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
...
...
lisp/gnus/gnus-sum.el
View file @
8b8059de
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment