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

   1 module Redwood
   2
   3 class ComposeMode < EditMessageMode
   4   attr_reader :body, :header
   5
   6   def initialize h={}
   7     super()
   8     @header = {
   9       "From" => AccountManager.default_account.full_address,
  10       "Message-Id" => gen_message_id,
  11     }
  12
  13     @header["To"] = [h[:to]].flatten.compact.map { |p| p.full_address }
  14     @body = sig_lines
  15     regen_text
  16   end
  17
  18   def lines; @text.length; end
  19   def [] i; @text[i]; end
  20
  21 protected
  22
  23   def handle_new_text new_header, new_body
  24     @header = new_header
  25     @body = new_body
  26   end
  27
  28   def regen_text
  29     @text = header_lines(@header - EditMessageMode::NON_EDITABLE_HEADERS) + [""] + @body
  30   end
  31 end
  32
  33 end