Author: pgollucci
Date: Fri Sep 9 01:57:38 2005
New Revision: 279736
URL: http://svn.apache.org/viewcvs?rev=279736&view=rev
Log:
un cuddle else add somewhite space
Modified:
perl/modperl/trunk/lib/ModPerl/Config.pm
Modified: perl/modperl/trunk/lib/ModPerl/Config.pm
URL:
http://svn.apache.org/viewcvs/perl/modperl/trunk/lib/ModPerl/Config.pm?rev=279736&r1=279735&r2=279736&view=diff
==============================================================================
--- perl/modperl/trunk/lib/ModPerl/Config.pm (original)
+++ perl/modperl/trunk/lib/ModPerl/Config.pm Fri Sep 9 01:57:38 2005
@@ -48,11 +48,13 @@
# httpd opts
my $test_config = Apache::TestConfig->new({thaw=>1});
+
if (my $httpd = $test_config->{vars}->{httpd}) {
$command = "$httpd -V";
$cfg .= "\n\n*** $command\n";
$cfg .= qx{$command};
- } else {
+ }
+ else {
$cfg .= "\n\n*** The httpd binary was not found\n";
}