reply-mode.rb in sup-0.0.5

- old
+ new

@@ -16,15 +16,20 @@
 
   def initialize message
     super 2, :twiddles => false
     @m = message
 
+    ## it's important to put this early because it forces a read of
+    ## the full headers (most importantly the list-post header, if
+    ## any)
+    @body = reply_body_lines(message)
+
     from =
       if @m.recipient_email
         AccountManager.account_for(@m.recipient_email)
       else
-        (@m.to + @m.cc).argfind { |p| AccountManager.is_account? p }
+        (@m.to + @m.cc).find { |p| AccountManager.is_account? p }
       end || AccountManager.default_account
 
     from_email = @m.recipient_email || from.email
 
     ## ignore reply-to for list messages because it's typically set to
@@ -68,10 +73,10 @@
     end
 
     @type_labels = REPLY_TYPES.select { |t| @headers.member?(t) }
     @selected_type = @m.is_list_message? ? :list : :sender
 
-    @body = reply_body_lines(message) + sig_lines
+    @body += sig_lines
     regen_text
   end
 
   def lines; @text.length + 2; end
   def [] i