git.cworth.org Git - sup/blob - lib/sup/modes/label-search-results-mode.rb

   1 module Redwood
   2
   3 class LabelSearchResultsMode < ThreadIndexMode
   4   def initialize labels, newest_first
   5     @labels = labels
   6     opts = { :labels => @labels }
   7     opts[:load_deleted] = true if labels.include? :deleted
   8     opts[:load_spam] = true if labels.include? :spam
   9     super [], opts
  10     @newest_first = newest_first
  11   end
  12
  13   register_keymap do |k|
  14     k.add :refine_search, "Refine search", '|'
  15   end
  16
  17   def refine_search
  18     label_query = @labels.size > 1 ? "(#{@labels.join('||')})" : @labels.first
  19     query = BufferManager.ask :search, "refine query: ", "+label:#{label_query} "
  20     return unless query && query !~ /^\s*$/
  21     SearchResultsMode.spawn_from_query query, @newest_first
  22   end
  23
  24   def is_relevant? m; @labels.all? { |l| m.has_label? l } end
  25
  26   def self.spawn_nicely label
  27     label = LabelManager.label_for(label) unless label.is_a?(Symbol)
  28     case label
  29     when nil
  30     when :inbox
  31       BufferManager.raise_to_front InboxMode.instance.buffer
  32     else
  33       b, new = BufferManager.spawn_unless_exists("All threads with label '#{label}'") { LabelSearchResultsMode.new [label], true }
  34       b.mode.load_threads :num => b.content_height if new
  35     end
  36   end
  37 end
  38
  39 end