]> git.notmuchmail.org Git - sup/blob - lib/sup/sent.rb
Merge branch 'labels-before-subj'
[sup] / lib / sup / sent.rb
1 module Redwood
2
3 class SentManager
4   include Singleton
5
6   attr_accessor :source
7   def initialize fn
8     @fn = fn
9     @source = nil
10     self.class.i_am_the_instance self
11   end
12
13   def self.source_name; "sup://sent"; end
14   def self.source_id; 9998; end
15   def new_source; @source = Recoverable.new SentLoader.new; end
16
17   def write_sent_message time, from_email
18     need_blank = File.exists?(@fn) && !File.zero?(@fn)
19     File.open(@fn, "a") do |f|
20       f.puts if need_blank
21       f.puts "From #{from_email} #{time.asctime}"
22       yield f
23     end
24
25     PollManager.add_messages_from(@source) do |m, o, e|
26       m.remove_label :unread
27       m
28     end
29   end
30 end
31
32 class SentLoader < MBox::Loader
33   yaml_properties :cur_offset
34
35   def initialize cur_offset=0
36     @filename = Redwood::SENT_FN
37     File.open(@filename, "w") { } unless File.exists? @filename
38     super "mbox://" + @filename, cur_offset, true, true
39   end
40
41   def file_path; @filename end
42
43   def uri; SentManager.source_name; end
44   def to_s; SentManager.source_name; end
45   def id; SentManager.source_id; end
46   def labels; [:sent, :inbox]; end
47 end
48
49 end