Add mail style template override.

lib/WebGUI/AssetAspect/Mailable.pm

@@ -25,6 +25,12 @@ sub definition {
 	my $i18n        = WebGUI::International->new( $session,'AssetAspect_Mailable' );
 
 	tie my %properties, 'Tie::IxHash', (
+        mailStyleTemplateId => {
+            fieldType   => 'template',
+            label       => 'Mail template',
+            tab         => 'mailable',
+            namespace   => 'style',
+        },
 	);
 
 	push( @{ $definition }, {
@@ -73,8 +79,15 @@ sub processContentAsUser {
     $session->user( { userId => $userId } );
     $session->log->preventDebugOutput;
 
+    my $styleTemplateId = 
+           $self->get('mailStyleTemplateId') 
+        || $self->get('styleTemplateId');
+
     # Generate email body for this user
-    my $content = $self->generateEmailContent;
+    my $content = $session->style->process(   
+        $self->generateEmailContent,
+        $styleTemplateId,
+    );
 
     # Process macros
     WebGUI::Macro::process( $session, \$content );