exit fails here, grabbing the value from the last eval

Index: t/response/TestModperl/exit.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/response/TestModperl/exit.pm,v
retrieving revision 1.1
diff -u -r1.1 exit.pm
--- t/response/TestModperl/exit.pm      8 Oct 2001 23:45:01 -0000       1.1
+++ t/response/TestModperl/exit.pm      9 Apr 2002 02:41:09 -0000
@@ -13,6 +13,8 @@

      ok 1;

+    eval {require "cannotexist927"};
+
      ModPerl::Util::exit();

      #not reached

__________________________________________________________________
Stas Bekman            JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/     mod_perl Guide ---> http://perl.apache.org
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org   http://ticketmaster.com


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

Reply via email to