register_keymap do |k|
## overwrite toggle_archived with archive
k.add :archive, "Archive thread (remove from inbox)", 'a'
+ k.add :read_and_archive, "Archive thread (remove from inbox) and mark read", 'A'
end
def initialize
- super [:inbox], [:inbox]
+ super [:inbox, :sent, :draft], { :label => :inbox, :skip_killed => true }
+ raise "can't have more than one!" if defined? @@instance
+ @@instance = self
end
+ def is_relevant? m
+ m.has_label?(:inbox) && ([:spam, :deleted, :killed] & m.labels).empty?
+ end
+
+ ## label-list-mode wants to be able to raise us if the user selects
+ ## the "inbox" label, so we need to keep our singletonness around
+ def self.instance; @@instance; end
def killable?; false; end
def archive
regen_text
end
- def handle_archived_update sender, t
- if contains_thread? t
+ def read_and_archive
+ return unless cursor_thread
+ cursor_thread.remove_label :unread
+ cursor_thread.remove_label :inbox
+ hide_thread cursor_thread
+ regen_text
+ end
+
+ def multi_read_and_archive threads
+ threads.each do |t|
+ t.remove_label :unread
+ t.remove_label :inbox
hide_thread t
- regen_text
end
+ regen_text
end
-# not quite working, and not sure if i like it anyways
-# def handle_unarchived_update sender, t
-# Redwood::log "unarchived #{t.subj}"
-# show_thread t
-# end
-
- def status
- super + " #{Index.size} messages in index"
+ def handle_unarchived_update sender, m
+ add_or_unhide m
end
- def is_relevant? m; m.has_label? :inbox; end
+ def handle_archived_update sender, m
+ t = thread_containing(m) or return
+ hide_thread t
+ regen_text
+ end
- def load_threads opts={}
- n = opts[:num] || ThreadIndexMode::LOAD_MORE_THREAD_NUM
- load_n_threads_background n, :label => :inbox,
- :when_done => (lambda do |num|
- opts[:when_done].call(num) if opts[:when_done]
- BufferManager.flash "Added #{num} threads."
- end)
+ def status
+ super + " #{Index.size} messages in index"
end
end