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

   1 module Redwood
   2
   3 class PollMode < LogMode
   4   def initialize
   5     @new = true
   6     super "poll for new messages"
   7   end
   8
   9   def poll
  10     unless @new
  11       @new = false
  12       self << "\n"
  13     end
  14     self << "Poll started at #{Time.now}\n"
  15     PollManager.do_poll { |s| self << (s + "\n") }
  16   end
  17 end
  18
  19 end