cvs commit: modperl-2.0/ModPerl-Registry/t closure.t

2003-02-06 Thread stas 
stas2003/02/06 16:40:32

  Modified:ModPerl-Registry/t closure.t
  Log:
  correct the explanation
  
  Revision  ChangesPath
  1.6   +3 -2  modperl-2.0/ModPerl-Registry/t/closure.t
  
  Index: closure.t
  ===
  RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/closure.t,v
  retrieving revision 1.5
  retrieving revision 1.6
  diff -u -r1.5 -r1.6
  --- closure.t 22 May 2002 05:40:48 -  1.5
  +++ closure.t 7 Feb 2003 00:40:32 -   1.6
  @@ -118,9 +118,10 @@
   
   sub sleep_and_touch_file {
   my $file = shift;
  -# need to wait at least 1 whole sec, so -M will notice the
  +# need to wait at least 1 whole sec, so utime() will notice the
   # difference. select() has better resolution than 1 sec as in
  -# sleep()
  +# sleep() so we are more likely to have the minimal waiting time,
  +# while fullfilling the purpose
   select undef, undef, undef, 1.00; # sure 1 sec
   my $now = time;
   utime $now, $now, $file;

cvs commit: modperl-2.0/ModPerl-Registry/t closure.t

2003-02-06 Thread stas 
stas2003/02/06 16:51:08

  Modified:ModPerl-Registry/t closure.t
  Log:
  spel
  
  Revision  ChangesPath
  1.7   +1 -1  modperl-2.0/ModPerl-Registry/t/closure.t
  
  Index: closure.t
  ===
  RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/closure.t,v
  retrieving revision 1.6
  retrieving revision 1.7
  diff -u -r1.6 -r1.7
  --- closure.t 7 Feb 2003 00:40:32 -   1.6
  +++ closure.t 7 Feb 2003 00:51:08 -   1.7
  @@ -121,7 +121,7 @@
   # need to wait at least 1 whole sec, so utime() will notice the
   # difference. select() has better resolution than 1 sec as in
   # sleep() so we are more likely to have the minimal waiting time,
  -# while fullfilling the purpose
  +# while fulfilling the purpose
   select undef, undef, undef, 1.00; # sure 1 sec
   my $now = time;
   utime $now, $now, $file;