cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestConfig.pm

[stas]

stas        01/12/14 01:32:11

  Modified:    perl-framework/Apache-Test/lib/Apache TestConfig.pm
  Log:
  - align the caller frame numbering to %02d
  
  Revision  Changes    Path
  1.105     +1 -1      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
  
  Index: TestConfig.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
  retrieving revision 1.104
  retrieving revision 1.105
  diff -u -r1.104 -r1.105
  --- TestConfig.pm     2001/12/14 08:55:25     1.104
  +++ TestConfig.pm     2001/12/14 09:32:11     1.105
  @@ -593,7 +593,7 @@
       while (1) {
           my($package, $filename, $line) = caller($frame);
           last unless $filename;
  -        $trace .= "$frame. $filename:$line\n";
  +        $trace .= sprintf "%02d: %s:%d\n", $frame, $filename, $line;
           $frame++;
       }