From: Katsumi Yamaoka Date: Fri, 19 Aug 2011 08:52:18 +0000 (+0000) Subject: gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative): Make button... X-Git-Tag: emacs-pretest-24.0.90~104^2~124^2~6 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f08670270206439ed672793573159c611a6f1379;p=emacs.git gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative): Make button keymap non-sticky after buttons. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 230bd8a6508..64ac50fe8f0 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2011-08-19 Katsumi Yamaoka + + * gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative): + Make button keymap non-sticky after buttons. + 2011-08-18 David Engster * nnmairix.el (nnmairix-request-set-mark) diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 28c6aca367c..c6e0180dadc 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -5700,7 +5700,8 @@ all parts." gnus-callback gnus-mm-display-part gnus-part ,gnus-tmp-id article-type annotation - gnus-data ,handle)) + gnus-data ,handle + rear-nonsticky t)) (setq e (if (bolp) ;; Exclude a newline. (1- (point)) @@ -6013,7 +6014,8 @@ If displaying \"text/html\" is discouraged \(see ,gnus-mouse-face-prop ,gnus-article-mouse-face face ,gnus-article-button-face gnus-part ,id - article-type multipart)) + article-type multipart + rear-nonsticky t)) (widget-convert-button 'link from (point) :action 'gnus-widget-press-button :button-keymap gnus-widget-button-keymap) @@ -6037,7 +6039,8 @@ If displaying \"text/html\" is discouraged \(see ,gnus-mouse-face-prop ,gnus-article-mouse-face face ,gnus-article-button-face gnus-part ,id - gnus-data ,handle)) + gnus-data ,handle + rear-nonsticky t)) (widget-convert-button 'link from (point) :action 'gnus-widget-press-button :button-keymap gnus-widget-button-keymap)