--- Gmail.pm.orig	Tue Dec  5 16:01:29 2006
+++ Gmail.pm	Fri Feb  9 23:55:02 2007
@@ -75,13 +75,21 @@
     my $feed_title = $feed->title;
        $feed_title =~ tr/,//d;
 
+    my $mailsender = $feed->title;
+    if ($self->conf->{'send_from_author'}) {
+      $mailsender = ($feed->author || $feed->entries->[0]->author);
+    }
+    $mailsender =~ tr/,//d;
+
     my $now = Plagger::Date->now(timezone => $context->conf->{timezone});
 
+    my $header_mime = $self->conf->{'header_mime'} || 'MIME-Header';
+
     my $msg = MIME::Lite->new(
         Date => $now->format('Mail'),
-        From => encode('MIME-Header', qq("$feed_title" <$cfg->{mailfrom}>)),
+        From => encode($header_mime, qq("$mailsender" <$cfg->{mailfrom}>)),
         To   => $cfg->{mailto},
-        Subject => encode('MIME-Header', $subject),
+        Subject => encode($header_mime, $subject),
         Type => 'multipart/related',
     );
     $msg->replace("X-Mailer" => "Plagger/$Plagger::VERSION");
@@ -300,6 +308,16 @@
 =item attach_enclosures
 
 Flag to attach enclosures as Email attachments. Defaults to 0.
+
+=item header_mime
+
+'MIME-Header' for encoding Mail header.
+If you want iso-2022-jp, set 'MIME-Header-ISO_2022_JP'.
+
+=item send_from_author
+
+Set mail sender to feed author.
+
 
 =back