X-Git-Url: http://git.shiar.net/perl/plp/.git/blobdiff_plain/6fb22c399428a8e7cac088cab5603e75a87016fa..ef6d542255046b6f50d7047d8e5a1d85b9f01042:/PLP/Tie/Print.pm

diff --git a/PLP/Tie/Print.pm b/PLP/Tie/Print.pm
index 7563ba5..9d0c0a9 100644
--- a/PLP/Tie/Print.pm
+++ b/PLP/Tie/Print.pm
@@ -19,7 +19,7 @@ sub WRITE { undef; }
 
 sub PRINT {
     my ($self, @param) = @_;
-    PLP::SendHeaders() unless $PLP::sentheaders;
+    PLP::sendheaders() unless $PLP::sentheaders;
     print STDOUT @param;
     select STDOUT;
 }