cvs commit: httpd-apreq-2/win32 Configure.pl

[randyk]

randyk      2004/06/23 21:21:51

  Modified:    win32    Configure.pl
  Log:
  sync win32 generation of docs using doxygen with recent changes to
  build/doxygen.conf.in.
  
  Revision  Changes    Path
  1.33      +6 -4      httpd-apreq-2/win32/Configure.pl
  
  Index: Configure.pl
  ===================================================================
  RCS file: /home/cvs/httpd-apreq-2/win32/Configure.pl,v
  retrieving revision 1.32
  retrieving revision 1.33
  diff -u -r1.32 -r1.33
  --- Configure.pl      24 Jun 2004 04:13:39 -0000      1.32
  +++ Configure.pl      24 Jun 2004 04:21:50 -0000      1.33
  @@ -12,6 +12,7 @@
   use File::Path;
   use LWP::Simple;
   my ($apache, $debug, $help, $no_perl, $perl);
  +my $VERSION = '2.03-dev';
   my $result = GetOptions( 'with-apache2=s' => \$apache,
                         'debug' => \$debug,
                         'help' => \$help,
  @@ -124,13 +125,14 @@
   END
   
       my $bin_abspath = Win32::GetShortPathName(dirname($doxysearch));
  -    open(my $conf, "$apreq_home/build/doxygen.conf") 
  -        or die "Cannot read $apreq_home/build/doxygen.conf: $!";
  +    open(my $conf, "$apreq_home/build/doxygen.conf.in") 
  +        or die "Cannot read $apreq_home/build/doxygen.conf.in: $!";
       open(my $win32_conf, ">$apreq_home/build/doxygen.conf.win32")
           or die "Cannot write to $apreq_home/build/doxygen.conf.win32: $!";
       while (<$conf>) {
  -        s/^(PERL_PATH\s+=\s+).*/$1"$^X"/;
  -        s/^(BIN_ABSPATH\s+=\s+).*/$1$bin_abspath/;
  +        s/[EMAIL PROTECTED]@/"$^X"/;
  +        s/[EMAIL PROTECTED]@/libapreq2/;
  +        s/[EMAIL PROTECTED]@/$VERSION/;
           print $win32_conf $_;
       }
       close $conf;