aboutsummaryrefslogtreecommitdiff
path: root/sx-compose.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2014-12-02 01:20:09 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2014-12-02 01:20:09 +0000
commit59c49ce60fcfa1fac4827beb11a04c0ef8585b9a (patch)
tree779443bdba73197012c5c043230dc81028cc8d8e /sx-compose.el
parentb8d3e61e0d02796fdd4d0c973dc4fbc9e856baa6 (diff)
Editing implemented
Fix #11
Diffstat (limited to 'sx-compose.el')
-rw-r--r--sx-compose.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/sx-compose.el b/sx-compose.el
index e09240f..dcb1bb0 100644
--- a/sx-compose.el
+++ b/sx-compose.el
@@ -165,6 +165,11 @@ respectively added locally to `sx-compose-before-send-hook' and
(insert sx-compose--question-headers)
(goto-char (point-min))
(goto-char (line-end-position))))
+ (when (consp parent)
+ (when (or (string= (buffer-string) "")
+ (y-or-n-p "Draft buffer exists. Reset it? "))
+ (erase-buffer)
+ (insert (cdr (assoc 'body_markdown parent)))))
;; Return the buffer
(current-buffer))))