procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

gnus-art.el (gnus-article-extend-url-button): Make it work again with gnus-button-push revised at 2011-01-19

Browse source
This commit is contained in:
Katsumi Yamaoka 2013-06-28 08:03:21 +00:00
parent eadb606887
commit dbca79f8ce
2 changed files with 8 additions and 1 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 @@
2013-06-28 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-art.el (gnus-article-extend-url-button): Make it work again with
gnus-button-push revised at 2011-01-19.
2013-06-19 Glenn Morris <rgm@gnu.org>
* gnus-group.el (gnus-mark-article-as-read): Fix declaration.

4
lisp/gnus/gnus-art.el
View file

@ -7866,7 +7866,9 @@ url is put as the `gnus-button-url' overlay property on the button."
(let (gnus-article-mouse-face widget-mouse-face)
(while points
(gnus-article-add-button (pop points) (pop points)
'gnus-button-push beg)))
'gnus-button-push
(list beg (assq 'gnus-button-url-regexp
gnus-button-alist)))))
(let ((overlay (gnus-make-overlay start end)))
(gnus-overlay-put overlay 'evaporate t)
(gnus-overlay-put overlay 'gnus-button-url