]> git.cworth.org Git - sup/blobdiff - lib/sup/modes/compose-mode.rb
fixes for ruby1.9
[sup] / lib / sup / modes / compose-mode.rb
index 7674d7bda63538c5014e4e32aa4740f13203f01f..04d5922381b728de2034c9dbda3b8089d78d7ccc 100644 (file)
@@ -5,10 +5,11 @@ class ComposeMode < EditMessageMode
     header = {}
     header["From"] = (opts[:from] || AccountManager.default_account).full_address
     header["To"] = opts[:to].map { |p| p.full_address }.join(", ") if opts[:to]
-    header["To"] = opts[:to].map { |p| p.full_address }.join(", ") if opts[:to]
     header["Cc"] = opts[:cc].map { |p| p.full_address }.join(", ") if opts[:cc]
     header["Bcc"] = opts[:bcc].map { |p| p.full_address }.join(", ") if opts[:bcc]
     header["Subject"] = opts[:subj] if opts[:subj]
+    header["References"] = opts[:refs].map { |r| "<#{r}>" }.join(" ") if opts[:refs]
+    header["In-Reply-To"] = opts[:replytos].map { |r| "<#{r}>" }.join(" ") if opts[:replytos]
 
     super :header => header, :body => (opts[:body] || [])
   end