stas 02/01/01 02:24:21 Modified: t/response/TestAPR lib.pm Log: debug prints start with # Revision Changes Path 1.2 +2 -1 modperl-2.0/t/response/TestAPR/lib.pm Index: lib.pm =================================================================== RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/lib.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- lib.pm 2 Apr 2001 09:04:28 -0000 1.1 +++ lib.pm 1 Jan 2002 10:24:21 -0000 1.2 @@ -4,6 +4,7 @@ use warnings FATAL => 'all'; use Apache::Test; +use Apache::TestUtil; use APR::Lib (); @@ -22,7 +23,7 @@ my $str= APR::strerror($status); - print "strerror=$str\n"; + t_debug "strerror=$str\n"; ok $str eq 'passwords do not match';