[TheSchwartz-Worker-SendEmail] r15: LJSUP-8073: Compressed email's texts in ...

U   trunk/lib/TheSchwartz/Worker/SendEmail.pm

Modified: trunk/lib/TheSchwartz/Worker/SendEmail.pm
===================================================================
--- trunk/lib/TheSchwartz/Worker/SendEmail.pm	2010-10-08 15:06:42 UTC (rev 14)
+++ trunk/lib/TheSchwartz/Worker/SendEmail.pm	2011-03-03 10:42:20 UTC (rev 15)
@@ -141,6 +141,11 @@
     my $message  = $args->{data};
     my $hstr     = $job->handle->as_string;
 
+    ## Unzip message if needed
+    if ($args->{compressed}){
+        $message = Compress::Zlib::memGunzip($message);
+    }
+
     my $res = LJ::DoSendEmail->send($rcpt, {
                         from      => $env_from,
                         data      => $message,