Revision: 56 Author: matt Date: 2006-08-07 14:44:16 +0000 (Mon, 07 Aug 2006)
Log Message: ----------- Convert warn()s to log()s Modified Paths: -------------- trunk/lib/AxKit2/Transformer/XPathScript.pm Modified: trunk/lib/AxKit2/Transformer/XPathScript.pm =================================================================== --- trunk/lib/AxKit2/Transformer/XPathScript.pm 2006-08-07 14:43:39 UTC (rev 55) +++ trunk/lib/AxKit2/Transformer/XPathScript.pm 2006-08-07 14:44:16 UTC (rev 56) @@ -3,6 +3,7 @@ use strict; use warnings; +use AxKit2::Constants; use XML::XPathScript; use base qw(AxKit2::Transformer); @@ -21,7 +22,7 @@ my $self = shift; my ($pos, $processor) = @_; - warn 'in transform'; + $self->log( LOGDEBUG, 'in transform' ); my $dom = $processor->dom; @@ -46,7 +47,7 @@ sub output { my ($self, $client, $dom) = @_; - warn 'in output'; + $self->log( LOGDEBUG, 'in output' ); my $out; my $ct = 'text/xml'; @@ -77,4 +78,4 @@ $client->write($out); } -1; \ No newline at end of file +1;