I've messed something and I've started to get some problems, so I've added
these checks:

Index: Apache-Test/lib/Apache/TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.39
diff -u -r1.39 TestConfig.pm
--- Apache-Test/lib/Apache/TestConfig.pm        2001/08/21 18:53:48
1.39
+++ Apache-Test/lib/Apache/TestConfig.pm        2001/08/25 17:08:50
@@ -127,6 +127,11 @@
         };
     };

+    # $thaw wasn't blessed
+    if (ref $thaw eq 'HASH') {
+        die "couldn't find apache_test_config.pm";
+    }
+
     if ($args->{thaw}) {
         #dont generate any new config
         $thaw->{vars}->{$_} = $args->{$_} for keys %$args;
@@ -431,6 +436,9 @@
 #look for mod_foo.so
 sub find_apache_module {
     my($self, $module) = @_;
+
+    warn "module is not defined",
+        return undef unless $module;

     my $vars = $self->{vars};
     my $sroot = $vars->{serverroot};


_____________________________________________________________________
Stas Bekman              JAm_pH     --   Just Another mod_perl Hacker
http://stason.org/       mod_perl Guide  http://perl.apache.org/guide
mailto:[EMAIL PROTECTED]   http://apachetoday.com http://eXtropia.com/
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to