r51834 - in /trunk/liblog-handler-perl: ChangeLog META.yml README debian/changelog lib/Log/Handler.pm lib/Log/Handler/Output/Email.pm

[jawnsy-guest at users.alioth.debian.org]

Author: jawnsy-guest
Date: Sat Jan 30 04:59:54 2010
New Revision: 51834

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=51834
Log:
New upstream release

Modified:
    trunk/liblog-handler-perl/ChangeLog
    trunk/liblog-handler-perl/META.yml
    trunk/liblog-handler-perl/README
    trunk/liblog-handler-perl/debian/changelog
    trunk/liblog-handler-perl/lib/Log/Handler.pm
    trunk/liblog-handler-perl/lib/Log/Handler/Output/Email.pm

Modified: trunk/liblog-handler-perl/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/ChangeLog?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/ChangeLog (original)
+++ trunk/liblog-handler-perl/ChangeLog Sat Jan 30 04:59:54 2010
@@ -1,3 +1,7 @@
+0.64    Released at 2010-01-29.
+        - Fixed a bug in Email.pm on line 256 - $string can be
+          uninitialized.
+
 0.63    Released at 2009-11-24.
         - Fixed a typo in Email.pm (RT #51745).
         - Added options cc and bcc to Email.pm - this was a

Modified: trunk/liblog-handler-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/META.yml?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/META.yml (original)
+++ trunk/liblog-handler-perl/META.yml Sat Jan 30 04:59:54 2010
@@ -1,6 +1,6 @@
 ---
 name: Log-Handler
-version: 0.63
+version: 0.64
 author:
   - Jonny Schulz
 abstract: Log messages to several outputs.
@@ -31,7 +31,7 @@
 provides:
   Log::Handler:
     file: lib/Log/Handler.pm
-    version: 0.63
+    version: 0.64
   Log::Handler::Config:
     file: lib/Log/Handler/Config.pm
     version: 0.07
@@ -46,7 +46,7 @@
     version: 0.09
   Log::Handler::Output::Email:
     file: lib/Log/Handler/Output/Email.pm
-    version: 0.07
+    version: 0.08
   Log::Handler::Output::File:
     file: lib/Log/Handler/Output/File.pm
     version: 0.06

Modified: trunk/liblog-handler-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/README?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/README (original)
+++ trunk/liblog-handler-perl/README Sat Jan 30 04:59:54 2010
@@ -348,7 +348,7 @@
     message_pattern
         This option is just useful if you want to forward messages to output
         modules that needs the parts of a message as a hash reference - as
-        example Log::Handler::Output::Forward, Log::Handler::Output::DBI
+        example Log::Handler::Output::Forward, Log::Handler::Output::DBI or
         Log::Handler::Output::Screen.
 
         The option expects a list of placeholders:

Modified: trunk/liblog-handler-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/debian/changelog?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/debian/changelog (original)
+++ trunk/liblog-handler-perl/debian/changelog Sat Jan 30 04:59:54 2010
@@ -1,3 +1,9 @@
+liblog-handler-perl (0.64-1) UNRELEASED; urgency=low
+
+  * New upstream release
+
+ -- Jonathan Yu <jawnsy at cpan.org>  Sat, 30 Jan 2010 00:09:23 -0500
+
 liblog-handler-perl (0.63-1) unstable; urgency=low
 
   * New upstream release

Modified: trunk/liblog-handler-perl/lib/Log/Handler.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/lib/Log/Handler.pm?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/lib/Log/Handler.pm (original)
+++ trunk/liblog-handler-perl/lib/Log/Handler.pm Sat Jan 30 04:59:54 2010
@@ -390,7 +390,7 @@
 This option is just useful if you want to forward messages to output
 modules that needs the parts of a message as a hash reference - as
 example L<Log::Handler::Output::Forward>, L<Log::Handler::Output::DBI>
-L<Log::Handler::Output::Screen>.
+or L<Log::Handler::Output::Screen>.
 
 The option expects a list of placeholders:
 
@@ -1114,7 +1114,7 @@
 use UNIVERSAL;
 use base qw(Log::Handler::Levels);
 
-our $VERSION = "0.63";
+our $VERSION = "0.64";
 our $ERRSTR  = "";
 
 # $TRACE and $CALLER_LEVEL are both used as global

Modified: trunk/liblog-handler-perl/lib/Log/Handler/Output/Email.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/liblog-handler-perl/lib/Log/Handler/Output/Email.pm?rev=51834&op=diff
==============================================================================
--- trunk/liblog-handler-perl/lib/Log/Handler/Output/Email.pm (original)
+++ trunk/liblog-handler-perl/lib/Log/Handler/Output/Email.pm Sat Jan 30 04:59:54 2010
@@ -182,7 +182,7 @@
 use Net::SMTP;
 use Params::Validate qw();
 
-our $VERSION = "0.07";
+our $VERSION = "0.08";
 our $ERRSTR  = "";
 our $TEST    =  0; # is needed to disable flush() for tests
 
@@ -250,7 +250,10 @@
         $string .= $buf->{message};
     }
 
-    $message->{message} = $string . $message->{message};
+    if (defined $string) {
+        $message->{message} = $string . $message->{message};
+    }
+
     return $self->sendmail($message);
 }