]> git.cworth.org Git - sup/blob - lib/sup/tagger.rb
moved evertying to devel
[sup] / lib / sup / tagger.rb
1 module Redwood
2
3 class Tagger
4   def initialize mode
5     @mode = mode
6     @tagged = {}
7   end
8
9   def tagged? o; @tagged[o]; end
10   def toggle_tag_for o; @tagged[o] = !@tagged[o]; end
11   def drop_all_tags; @tagged.clear; end
12   def drop_tag_for o; @tagged.delete o; end
13
14   def apply_to_tagged
15     num_tagged = @tagged.map { |t| t ? 1 : 0 }.sum
16     if num_tagged == 0
17       BufferManager.flash "No tagged messages!"
18       return
19     end
20
21     noun = num_tagged == 1 ? "message" : "messages"
22     c = BufferManager.ask_getch "apply to #{num_tagged} tagged #{noun}:"
23     return if c.nil? # user cancelled
24
25     if(action = @mode.resolve_input c)
26       tagged_sym = "multi_#{action}".intern
27       if @mode.respond_to? tagged_sym
28         targets = @tagged.select_by_value
29         @mode.send tagged_sym, targets
30       else
31         BufferManager.flash "That command cannot be applied to multiple messages."
32       end
33     else
34       BufferManager.flash "Unknown command #{c.to_character}."
35     end
36   end
37
38 end
39
40 end