diff options
| author | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-11-29 20:53:52 +0000 |
|---|---|---|
| committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2014-11-29 20:59:59 +0000 |
| commit | eca252dfddba3b18d4da74bee1b802c8d59e0c4a (patch) | |
| tree | 34f4ae1dfb71707dd36ec0357425c0e22e05f379 /sx-question-print.el | |
| parent | 8d38a7bfe808f6af9c95ca7a490a7a822ea59e73 (diff) | |
New "Add a Comment" button
Diffstat (limited to 'sx-question-print.el')
| -rw-r--r-- | sx-question-print.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/sx-question-print.el b/sx-question-print.el index b8fc633..22f857c 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -237,7 +237,12 @@ DATA can represent a question or an answer." .body_markdown) "\n" (propertize sx-question-mode-separator - 'face 'sx-question-mode-header))))) + 'face 'sx-question-mode-header)))) + ;; This is where the "add a comment" button is printed. + (insert " ") + (insert-text-button "Add a Comment" + :type 'sx-button-comment) + (insert "\n")) ;; Comments have their own `sx--data-here' property (so they can ;; be upvoted too). (when .comments |