[Catalyst-commits] r12733 - in Catalyst-View-Email/trunk: . lib/Catalyst/View lib/Catalyst/View/Email

[dhoss at dev.catalyst.perl.org]

Author: dhoss
Date: 2010-01-27 09:04:47 +0000 (Wed, 27 Jan 2010)
New Revision: 12733

Modified:
   Catalyst-View-Email/trunk/dist.ini
   Catalyst-View-Email/trunk/lib/Catalyst/View/Email.pm
   Catalyst-View-Email/trunk/lib/Catalyst/View/Email/Template.pm
Log:
corrected version shit, replaced Email::Send with Email::Sender::Simple

Modified: Catalyst-View-Email/trunk/dist.ini
===================================================================
--- Catalyst-View-Email/trunk/dist.ini	2010-01-26 23:38:23 UTC (rev 12732)
+++ Catalyst-View-Email/trunk/dist.ini	2010-01-27 09:04:47 UTC (rev 12733)
@@ -1,6 +1,6 @@
 name = Catalyst-View-Email
 author = J. Shirley <jshirley at gmail.com>
-version = 0.20
+version = 0.21
 license = Perl_5
 copyright_holder = J. Shirley
 

Modified: Catalyst-View-Email/trunk/lib/Catalyst/View/Email/Template.pm
===================================================================
--- Catalyst-View-Email/trunk/lib/Catalyst/View/Email/Template.pm	2010-01-26 23:38:23 UTC (rev 12732)
+++ Catalyst-View-Email/trunk/lib/Catalyst/View/Email/Template.pm	2010-01-27 09:04:47 UTC (rev 12733)
@@ -5,7 +5,7 @@
 use Scalar::Util qw/ blessed /;
 extends 'Catalyst::View::Email';
 
-our $VERSION = '0.19';
+our $VERSION = '0.21';
 
 =head1 NAME
 
@@ -235,7 +235,7 @@
 The process method is called when the view is dispatched to. This creates the
 multipart message and then sends the message contents off to
 L<Catalyst::View::Email> for processing, which in turn hands off to
-L<Email::Send>.
+L<Email::Sender::Simple>.
 
 =cut
 

Modified: Catalyst-View-Email/trunk/lib/Catalyst/View/Email.pm
===================================================================
--- Catalyst-View-Email/trunk/lib/Catalyst/View/Email.pm	2010-01-26 23:38:23 UTC (rev 12732)
+++ Catalyst-View-Email/trunk/lib/Catalyst/View/Email.pm	2010-01-27 09:04:47 UTC (rev 12733)
@@ -4,11 +4,11 @@
 use Carp;
 
 use Encode qw(encode decode);
-use Email::Sender::Simple qw/ sendmail /;
+use Email::Sender::Simpleer::Simple qw/ sendmail /;
 use Email::MIME::Creator;
 extends 'Catalyst::View';
 
-our $VERSION = '0.19';
+our $VERSION = '0.21';
 
 has 'mailer' => (
     is      => 'rw',
@@ -19,7 +19,7 @@
 
 has '_mailer_obj' => (
     is      => 'rw',
-    isa     => 'Email::Sender::Transport',
+    isa     => 'Email::Sender::Simpleer::Transport',
     lazy    => 1,
     builder => '_build_mailer_obj',
 );
@@ -94,12 +94,12 @@
                 charset => 'utf-8'
             },
             # Setup how to send the email
-            # all those options are passed directly to Email::Send
+            # all those options are passed directly to Email::Sender::Simple
             sender => {
-                # if mailer doesn't start with Email::Sender::Transport::,
+                # if mailer doesn't start with Email::Sender::Simpleer::Transport::,
                 # then this is prepended.
                 mailer => 'SMTP',
-                # mailer_args is passed directly into Email::Send 
+                # mailer_args is passed directly into Email::Sender::Simple 
                 mailer_args => {
                     host     => 'smtp.example.com', # defaults to localhost
                     username => 'username',
@@ -191,7 +191,7 @@
 
 =item new
 
-Validates the base config and creates the L<Email::Send> object for later use
+Validates the base config and creates the L<Email::Sender::Simple> object for later use
 by process.
 
 =cut
@@ -209,9 +209,9 @@
   my ($self) = @_;
   my $transport_class = ucfirst $self->sender->{mailer};
 
-  # borrowed from Email::Sender::Simple -- apeiron, 2010-01-26 
-  if ($transport_class !~ /^Email::Sender::Transport::/) {
-    $transport_class = "Email::Sender::Transport::$transport_class";
+  # borrowed from Email::Sender::Simpleer::Simple -- apeiron, 2010-01-26 
+  if ($transport_class !~ /^Email::Sender::Simpleer::Transport::/) {
+    $transport_class = "Email::Sender::Simpleer::Transport::$transport_class";
   }
 
   Class::MOP::load_class($transport_class);
@@ -223,7 +223,7 @@
 
 The process method does the actual processing when the view is dispatched to.
 
-This method sets up the email parts and hands off to L<Email::Send> to handle
+This method sets up the email parts and hands off to L<Email::Sender::Simple> to handle
 the actual email delivery.
 
 =cut
@@ -371,7 +371,7 @@
 As with most things computer related, things break.  Email even more so.  
 Typically any errors are going to come from using SMTP as your sending method,
 which means that if you are having trouble the first place to look is at
-L<Email::Send::SMTP>.  This module is just a wrapper for L<Email::Send>,
+L<Email::Sender::Simple::SMTP>.  This module is just a wrapper for L<Email::Sender::Simple>,
 so if you get an error on sending, it is likely from there anyway.
 
 If you are using SMTP and have troubles sending, whether it is authentication