[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 288ba2d: * lisp/gnus/mm-decode.el (mm-convert-shr-l
From: |
Katsumi Yamaoka |
Subject: |
[Emacs-diffs] master 288ba2d: * lisp/gnus/mm-decode.el (mm-convert-shr-links): |
Date: |
Thu, 14 Jul 2016 02:19:55 +0000 (UTC) |
branch: master
commit 288ba2d406d6277720463f4057cb74534abcec96
Author: Katsumi Yamaoka <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>
* lisp/gnus/mm-decode.el (mm-convert-shr-links):
Use shr-image-map instead of shr-map (bug#23964).
---
lisp/gnus/mm-decode.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el
index c653d73..c503953 100644
--- a/lisp/gnus/mm-decode.el
+++ b/lisp/gnus/mm-decode.el
@@ -1836,7 +1836,6 @@ If RECURSIVE, search recursively."
(delete-region ,(point-min-marker)
,(point-max-marker))))))))
-(defvar shr-map)
(defvar shr-image-map)
(autoload 'widget-convert-button "wid-edit")
@@ -1852,7 +1851,7 @@ If RECURSIVE, search recursively."
(widget-convert-button
'url-link start end
:help-echo (get-text-property start 'help-echo)
- :keymap (setq keymap (copy-keymap shr-map))
+ :keymap (setq keymap (copy-keymap shr-image-map))
(get-text-property start 'shr-url))
;; Remove keymap that `shr-urlify' adds.
(put-text-property start end 'keymap nil)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 288ba2d: * lisp/gnus/mm-decode.el (mm-convert-shr-links):,
Katsumi Yamaoka <=