From 3565beca174066a12d2d952d4b24d79a0ca55412 Mon Sep 17 00:00:00 2001 From: Juerd Waalboer Date: Thu, 11 Apr 2002 09:05:09 +0000 Subject: [PATCH] v3.03 release --- PLP.pm | 2 +- PLP/Tie/Print.pm | 1 + plp.cgi | 2 +- 3 files changed, 3 insertions(+), 2 deletions(-) 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); -- 2.30.0