From: Chris Nehren <apeiron@cpan.org>
Date: Sat, 26 Jun 2010 13:06:57 +0000 (-0400)
Subject: add a reply-to header so as to be less confusing and actually work right, now that... 
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e9b4d3bcc394d5680b0b26c67e4a7547e5a6bc1e;p=p5sagit%2FPromulger.git

add a reply-to header so as to be less confusing and actually work right, now that we have set the from header properly
---

diff --git a/lib/Promulger/Dispatch.pm b/lib/Promulger/Dispatch.pm
index 78340e1..408290d 100644
--- a/lib/Promulger/Dispatch.pm
+++ b/lib/Promulger/Dispatch.pm
@@ -75,9 +75,10 @@ sub post_message {
     # 2010-03-13 
     my $new_message = Email::Simple->create(
       header => [
-        From => $sender_address,
-        To   => $subscriber,
-        Subject => $email->header('Subject'),
+        From       => $sender_address,
+        To         => $subscriber,
+        Subject    => $email->header('Subject'),
+        'Reply-to' => $recipient,
       ],
       body => $body,
     );