From: J. Shirley <jshirley@gmail.com>
Date: Tue, 30 Oct 2007 16:19:50 +0000 (+0000)
Subject: Fixing call to generate_part
X-Git-Tag: v0.14~18
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0c8469c18de5228af50fdcc6f0c8a66de0a2bc47;p=catagits%2FCatalyst-View-Email.git

Fixing call to generate_part
---

diff --git a/lib/Catalyst/View/Email.pm b/lib/Catalyst/View/Email.pm
index e274daa..514eb01 100644
--- a/lib/Catalyst/View/Email.pm
+++ b/lib/Catalyst/View/Email.pm
@@ -222,7 +222,7 @@ sub process {
         $mime{attributes}->{charset} = $self->{default}->{charset};
     }
 
-    my $message = $self->generate_part( \%mime );
+    my $message = $self->generate_part( $c, \%mime );
 
     #my $message = Email::MIME->create(%mime);
 
@@ -260,8 +260,9 @@ sub setup_attributes {
 }
 
 sub generate_part {
-    my ( $self, $attr ) = @_;
+    my ( $self, $c, $attr ) = @_;
 
+$c->log->info("generate_part in Email");    
     # setup the attributes (merge with defaults)
     $attr->{attributes} = $self->setup_attributes($attr->{attributes});
     return Email::MIME->create(%$attr);