httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestSmoke.pm
Date Sun, 06 Jan 2002 18:20:17 GMT
dougm       02/01/06 10:20:17

  Modified:    perl-framework/Apache-Test/lib/Apache TestSmoke.pm
  Log:
  Digest::MD5 is not shipped with 5.6.1
  workaround for the moment by waiting till runtime to require it.
  
  Revision  Changes    Path
  1.8       +1 -1      httpd-test/perl-framework/Apache-Test/lib/Apache/TestSmoke.pm
  
  Index: TestSmoke.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestSmoke.pm,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- TestSmoke.pm	4 Jan 2002 04:32:47 -0000	1.7
  +++ TestSmoke.pm	6 Jan 2002 18:20:17 -0000	1.8
  @@ -8,7 +8,6 @@
   
   use Getopt::Long qw(GetOptions);
   use File::Spec::Functions qw(catfile);
  -use Digest::MD5 ();
   use POSIX ();
   use FindBin;
   
  @@ -264,6 +263,7 @@
   sub sequence_seen {
       my ($self, $rh_store, $ra_tests) = @_;
   
  +    require Digest::MD5;
       my $digest = Digest::MD5::md5_hex(join '', @$ra_tests);
       #error $self->{seen};
       return $rh_store->{$digest}++ ? 1 : 0
  
  
  

Mime
View raw message