httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject svn commit: r106362 - /httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm
Date Wed, 24 Nov 2004 00:20:52 GMT
Author: stas
Date: Tue Nov 23 16:20:51 2004
New Revision: 106362

Modified:
   httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm
Log:
clean whitespace


Modified: httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm
Url: http://svn.apache.org/viewcvs/httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm?view=diff&rev=106362&p1=httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm&r1=106361&p2=httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm&r2=106362
==============================================================================
--- httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm	(original)
+++ httpd/test/trunk/perl-framework/Apache-Test/lib/Apache/TestReport.pm	Tue Nov 23 16:20:51
2004
@@ -83,27 +83,27 @@
 my $core_dump;
 sub core_dump {
     my $self = shift;
-    
+
     $core_dump = "";
-    
+
     if (eval { require Devel::GDB }) {
         find(\&dump_core_file, 't')
     }
-    
+
     $core_dump || '  [CORE TRACE COMES HERE]';
 }
 
 sub dump_core_file {
     return unless /^core(\.\d+)?$/;
-    
+
     my $core = $_;
     my $gdb = new Devel::GDB ();
     my $test_config = Apache::TestConfig->new({thaw=>1});
     my $httpd = $test_config->{vars}->{httpd};
-    
+
     return unless defined $httpd;
-    
-    $core_dump .= join '', 
+
+    $core_dump .= join '',
            $gdb->get("file $httpd"),
            $gdb->get('sharedlibrary'),
            $gdb->get("core $core"),

Mime
View raw message