From 142916ca3639995e7a06277ded627b3b01ee4931 Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Tue, 2 Dec 2014 00:43:37 +0000 Subject: Add an answer button --- sx-button.el | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'sx-button.el') diff --git a/sx-button.el b/sx-button.el index c1abf90..cd01598 100644 --- a/sx-button.el +++ b/sx-button.el @@ -121,6 +121,14 @@ code-block." 'action #'sx-comment :supertype 'sx-button) +(define-button-type 'sx-button-answer + 'help-echo (concat "mouse-1, RET" + (propertize ": write an answer" + 'face 'minibuffer-prompt)) + 'face 'custom-button + 'action #'sx-answer + :supertype 'sx-button) + (provide 'sx-button) ;;; sx-button.el ends here -- cgit v1.2.3