[Emacs-diffs] /srv/bzr/emacs/trunk r105496: gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative): Make button keymap non-sticky after buttons.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 105496
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Fri 2011-08-19 08:52:18 +0000
message:
  gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative): Make 
button keymap non-sticky after buttons.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/gnus-art.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-08-18 22:12:47 +0000
+++ b/lisp/gnus/ChangeLog       2011-08-19 08:52:18 +0000
@@ -1,3 +1,8 @@
+2011-08-19  Katsumi Yamaoka  <address@hidden>
+
+       * gnus-art.el (gnus-insert-mime-button, gnus-mime-display-alternative):
+       Make button keymap non-sticky after buttons.
+
 2011-08-18  David Engster  <address@hidden>
 
        * nnmairix.el (nnmairix-request-set-mark)

=== modified file 'lisp/gnus/gnus-art.el'
--- a/lisp/gnus/gnus-art.el     2011-08-04 00:58:07 +0000
+++ b/lisp/gnus/gnus-art.el     2011-08-19 08:52:18 +0000
@@ -5700,7 +5700,8 @@
              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 @@
             ,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 @@
               ,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)