Skip to content
Browse files

Email::Sender::Simple

  • Loading branch information...
1 parent 7695fb3 commit 7aa992ff1d21a1288b1def4e8518d8c68bf31ead @xdg xdg committed Jan 7, 2011
Showing with 4 additions and 8 deletions.
  1. +2 −4 email_notify.pl
  2. +2 −4 summon_notify.pl
View
6 email_notify.pl
@@ -4,7 +4,7 @@
use Irssi;
use Email::Simple;
use Email::Simple::Creator;
-use Email::Send;
+use Email::Sender::Simple;
$VERSION = '0.0.2';
%IRSSI = (
@@ -29,8 +29,6 @@
# http://fedora.feedjack.org/user/918/
#--------------------------------------------------------------------
-my $MAILER = Email::Send->new( );
-
# Configuration handling
my %CONFIG;
@@ -98,7 +96,7 @@ sub _send_email {
],
body => $msg,
) or Irssi::print( "$IRSSI{name}: Couldn't create email '$subject'");
- $MAILER->send($email)
+ Email::Sender::Simple->try_to_send($email)
or Irssi::print( "$IRSSI{name}: Email '$subject' couldn't be sent" );
}
View
6 summon_notify.pl
@@ -4,7 +4,7 @@
use Irssi;
use Email::Simple;
use Email::Simple::Creator;
-use Email::Send;
+use Email::Sender::Simple;
$VERSION = '0.0.1';
%IRSSI = (
@@ -29,8 +29,6 @@
# http://fedora.feedjack.org/user/918/
#--------------------------------------------------------------------
-my $MAILER = Email::Send->new( );
-
# Configuration handling
my %CONFIG;
@@ -114,7 +112,7 @@ sub _send_email {
],
body => $msg,
) or Irssi::print( "$IRSSI{name}: Couldn't create email '$subject'");
- $MAILER->send($email)
+ Email::Sender::Simple->try_to_send($email)
or Irssi::print( "$IRSSI{name}: Email '$subject' couldn't be sent" );
}

0 comments on commit 7aa992f

Please sign in to comment.
Something went wrong with that request. Please try again.