]> git.cworth.org Git - sup/blob - lib/sup/modes/resume-mode.rb
fixed killed threads issue (i think)
[sup] / lib / sup / modes / resume-mode.rb
1 module Redwood
2
3 class ResumeMode < ComposeMode
4   def initialize m
5     super()
6     @id = m.id
7     @header, @body = parse_file m.draft_filename
8     @header.delete "Date"
9     @header["Message-Id"] = gen_message_id # generate a new'n
10     regen_text
11     @safe = false
12   end
13
14   def killable?
15     unless @safe
16       case BufferManager.ask_yes_or_no "Discard draft?"
17       when true
18         DraftManager.discard @id
19         BufferManager.flash "Draft discarded."
20         true
21       when false
22         BufferManager.flash "Draft saved."
23         true
24       else
25         false
26       end
27     end
28   end
29
30   def send_message
31     if super
32       DraftManager.discard @id 
33       @safe = true
34     end
35   end
36
37   def save_as_draft
38     @safe = true
39     DraftManager.discard @id if super
40   end
41 end
42
43 end