You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by st...@apache.org on 2003/11/25 00:31:31 UTC

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

stas        2003/11/24 15:31:31

  Modified:    perl-framework/Apache-Test Changes
               perl-framework/Apache-Test/lib/Apache TestConfig.pm
  Log:
  Fix Apache::TestConfig::add_config not to append " " at the end of the
  config lines. This was a problem with config sections imported from
  .pm files, the appended "" made it impossible to have multi-line
  directives using
  
  Revision  Changes    Path
  1.67      +5 -0      httpd-test/perl-framework/Apache-Test/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/Changes,v
  retrieving revision 1.66
  retrieving revision 1.67
  diff -u -u -r1.66 -r1.67
  --- Changes	24 Nov 2003 07:59:54 -0000	1.66
  +++ Changes	24 Nov 2003 23:31:31 -0000	1.67
  @@ -8,6 +8,11 @@
   
   =item 1.07-dev
   
  +Fix Apache::TestConfig::add_config not to append " " at the end of the
  +config lines. This was a problem with config sections imported from
  +.pm files, the appended "" made it impossible to have multi-line
  +directives using \ [Stas]
  +
   Fix a bug in '-port select' which was incorrectly using the same port
   twice [Stas]
   
  
  
  
  1.187     +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.186
  retrieving revision 1.187
  diff -u -u -r1.186 -r1.187
  --- TestConfig.pm	24 Nov 2003 08:28:34 -0000	1.186
  +++ TestConfig.pm	24 Nov 2003 23:31:31 -0000	1.187
  @@ -399,7 +399,7 @@
           $args = join "\n", @$directive;
       }
       else {
  -        $args = "$directive " .
  +        $args = join " ", grep length($_), $directive,
             (ref($arg) && (ref($arg) eq 'ARRAY') ? "@$arg" : $arg || "");
       }