perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-2.0/t/response/TestAPR util.pm
Date Wed, 30 Jan 2002 07:01:17 GMT
stas        02/01/29 23:01:17

  Modified:    t/response/TestAPR util.pm
  Log:
  - complete the APR::Lib to APR::Util move
  - adjust the function names to be APR::Util::...
  
  Revision  Changes    Path
  1.2       +4 -4      modperl-2.0/t/response/TestAPR/util.pm
  
  Index: util.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/response/TestAPR/util.pm,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- util.pm	30 Jan 2002 05:21:52 -0000	1.1
  +++ util.pm	30 Jan 2002 07:01:16 -0000	1.2
  @@ -1,4 +1,4 @@
  -package TestAPR::lib;
  +package TestAPR::util;
   
   use strict;
   use warnings FATAL => 'all';
  @@ -14,14 +14,14 @@
       plan $r, tests => 3;
   
       my $blen = 10;
  -    my $bytes = APR::generate_random_bytes(10);
  +    my $bytes = APR::Util::generate_random_bytes(10);
       ok length($bytes) == $blen;
   
  -    my $status = APR::password_validate("one", "two");
  +    my $status = APR::Util::password_validate("one", "two");
   
       ok $status != 0;
   
  -    my $str= APR::strerror($status);
  +    my $str= APR::Util::strerror($status);
   
       t_debug "strerror=$str\n";
   
  
  
  

Mime
View raw message