[PATCH mp2] Stop warning from BuildOptions.pm

[Steve Hay]

Attached is a patch to stop this warning being printed every time I run 
"perl Makefile.PL ...":

   Use of uninitialized value in concatenation (.) or string at 
lib/ModPerl/BuildOptions.pm line 107, <DATA> line 20.

- Steve
--- BuildOptions.pm.orig        2003-10-07 19:28:38.000000000 +0100
+++ BuildOptions.pm     2003-10-15 11:43:18.272019200 +0100
@@ -105,7 +105,7 @@
 
     my $fh;
     my @files = map { $_ . 'makepl_args.mod_perl2' }
-      qw(./ ../ ./. ../.), "$ENV{HOME}/.";
+      qw(./ ../ ./. ../.), (Apache::Build::WIN32() ? () : "$ENV{HOME}/.");
     unshift @files, $self->{MP_OPTIONS_FILE} if $self->{MP_OPTIONS_FILE};
 
     for my $file (@files) {
@@ -164,6 +164,8 @@
 
 sub table {
     $Table ||= parse_table(\*DATA);
+    close DATA;
+    return $Table;
 }
 
 1;
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]