switch to button-1, which seems to interact poorly with text-selection by mouse
authorAlexander Botero-Lowry <alex.boterolowry@gmail.com>
Sun, 22 Nov 2009 23:42:59 +0000 (15:42 -0800)
committerAlexander Botero-Lowry <alexbl@fortitudo.(none)>
Sun, 22 Nov 2009 23:42:59 +0000 (15:42 -0800)
notmuch.el

index ef2a72a82e6f874a90a1836099db090817927624..59277379f3bf46dfbcff3aa0cac698bccab80c02 100644 (file)
@@ -512,8 +512,9 @@ which this thread was originally shown."
                 (let ((cite-button (insert-button cite-button-text)))
                   (button-put cite-button 'invisibility-spec invis-spec)
                   (button-put cite-button 'action 'notmuch-toggle-invisible-action)
                 (let ((cite-button (insert-button cite-button-text)))
                   (button-put cite-button 'invisibility-spec invis-spec)
                   (button-put cite-button 'action 'notmuch-toggle-invisible-action)
+                  (button-put cite-button 'follow-link t)
                   (button-put cite-button 'help-echo
                   (button-put cite-button 'help-echo
-                              "mouse-2, RET: Show citation")
+                              "mouse-1, RET: Show citation")
 
                   )
                 (insert "\n")
 
                   )
                 (insert "\n")
@@ -537,8 +538,9 @@ which this thread was originally shown."
                       (button-put sig-button 'invisibility-spec invis-spec)
                       (button-put sig-button 'action
                                   'notmuch-toggle-invisible-action)
                       (button-put sig-button 'invisibility-spec invis-spec)
                       (button-put sig-button 'action
                                   'notmuch-toggle-invisible-action)
+                      (button-put sig-button 'follow-link t)
                       (button-put sig-button 'help-echo
                       (button-put sig-button 'help-echo
-                                  "mouse-2, RET: Show signature")
+                                  "mouse-1, RET: Show signature")
                       )
                     (insert "\n")
                     (goto-char end))))))
                       )
                     (insert "\n")
                     (goto-char end))))))