From: Juerd Waalboer <juerd@cpan.org>
Date: Thu, 11 Apr 2002 09:05:09 +0000 (+0000)
Subject: v3.03 release
X-Git-Tag: 3.06~3
X-Git-Url: http://git.shiar.net/perl/plp/.git/commitdiff_plain/3565beca174066a12d2d952d4b24d79a0ca55412

v3.03 release
---

diff --git a/PLP.pm b/PLP.pm
index 78e0dac..ad4a227 100644
--- a/PLP.pm
+++ b/PLP.pm
@@ -2,7 +2,7 @@ package PLP;
 
 # Not to be used without the CGI script;
 
-our $VERSION = '3.02';
+our $VERSION = '3.03';
 
 use PLP::Functions ();
 use PLP::Fields;
diff --git a/PLP/Tie/Print.pm b/PLP/Tie/Print.pm
index 9d0c0a9..0647f7c 100644
--- a/PLP/Tie/Print.pm
+++ b/PLP/Tie/Print.pm
@@ -19,6 +19,7 @@ sub WRITE { undef; }
 
 sub PRINT {
     my ($self, @param) = @_;
+    return if @param == 1 and not length $param[0];
     PLP::sendheaders() unless $PLP::sentheaders;
     print STDOUT @param;
     select STDOUT;
diff --git a/plp.cgi b/plp.cgi
index 850e305..a3c427b 100755
--- a/plp.cgi
+++ b/plp.cgi
@@ -2,7 +2,7 @@
 use v5.6.0;
 use PLP;
 
-die 'Wrong module version' if $PLP::VERSION ne '3.02';
+die 'Wrong module version' if $PLP::VERSION ne '3.03';
 
 use vars qw($DEBUG);