Changeset 21
- Timestamp:
- 02/05/06 11:00:59
- Files:
-
- trunk/plagger/lib/Plagger/Plugin/Publish/Gmail.pm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/plagger/lib/Plagger/Plugin/Publish/Gmail.pm
r18 r21 49 49 my($self, $context, $feed, $subject, $body) = @_; 50 50 51 $body = $self->htmlize($body); 52 51 53 my $cfg = $self->conf; 52 54 $context->log(warn => "Sending $subject to $cfg->{mailto}"); … … 74 76 } 75 77 78 sub htmlize { 79 my($self, $body) = @_; 80 return <<HTML; 81 <html> 82 <head> 83 <meta http-equiv="Content-Type" content="text/html;charset=utf-8" /> 84 </head> 85 <body> 86 $body 87 </body> 88 </html> 89 HTML 90 } 91 76 92 sub templatize { 77 93 my($self, $context, $feed, $item) = @_;
