aboutsummaryrefslogtreecommitdiff
path: root/sx-button.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2014-11-29 20:53:52 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2014-11-29 20:59:59 +0000
commiteca252dfddba3b18d4da74bee1b802c8d59e0c4a (patch)
tree34f4ae1dfb71707dd36ec0357425c0e22e05f379 /sx-button.el
parent8d38a7bfe808f6af9c95ca7a490a7a822ea59e73 (diff)
New "Add a Comment" button
Diffstat (limited to 'sx-button.el')
-rw-r--r--sx-button.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/sx-button.el b/sx-button.el
index ed94558..afc1cf7 100644
--- a/sx-button.el
+++ b/sx-button.el
@@ -25,6 +25,7 @@
(require 'sx)
(require 'sx-question)
+(require 'sx-interaction)
;;; Command definitions
@@ -92,6 +93,13 @@ This is usually a link's URL, or the content of a code block."
'action #'sx-button-follow-link
:supertype 'sx-button)
+(define-button-type 'sx-button-comment
+ 'help-echo (concat "mouse-1, RET"
+ (propertize ": write a comment"
+ 'face 'minibuffer-prompt))
+ 'action #'sx-comment
+ :supertype 'sx-button)
+
(provide 'sx-button)
;;; sx-button.el ends here