git.cworth.org Git - sup/blob - lib/sup/modes/inbox-mode.rb

   1 require 'thread'
   2
   3 module Redwood
   4
   5 class InboxMode < ThreadIndexMode
   6   register_keymap do |k|
   7     ## overwrite toggle_archived with archive
   8     k.add :archive, "Archive thread (remove from inbox)", 'a'
   9     k.add :load_more_threads, "Load #{LOAD_MORE_THREAD_NUM} more threads", 'M'
  10     k.add :reload, "Discard threads and reload", 'R'
  11   end
  12
  13   def initialize
  14     super [:inbox], [:inbox]
  15   end
  16
  17   def archive
  18     remove_label_and_hide_thread cursor_thread, :inbox
  19     regen_text
  20   end
  21
  22   def multi_archive threads
  23     threads.each { |t| remove_label_and_hide_thread t, :inbox }
  24     regen_text
  25   end
  26
  27   def is_relevant? m; m.has_label? :inbox; end
  28
  29   def load_more_threads n=ThreadIndexMode::LOAD_MORE_THREAD_NUM
  30     load_n_threads_background n, :label => :inbox,
  31                                  :load_killed => false,
  32                                  :load_spam => false,
  33                                  :when_done => lambda { |num|
  34       BufferManager.flash "Added #{num} threads."
  35     }
  36   end
  37
  38   def reload
  39     drop_all_threads
  40     BufferManager.draw_screen
  41     load_more_threads buffer.content_height
  42   end
  43 end
  44
  45 end