diff options
author | ivan <ivan> | 2001-05-30 15:17:08 +0000 |
---|---|---|
committer | ivan <ivan> | 2001-05-30 15:17:08 +0000 |
commit | 08cc56589e213542a72060234bdad49fbfeb67c2 (patch) | |
tree | 4a7e16850b102158087e6137508153a1c96772c7 | |
parent | 23346364fce20eea6d801b1aae093a56c38fe066 (diff) |
use Apache inside an eval BLOCK was mucking things up for the non-mod_perl folks
-rw-r--r-- | FS/FS/CGI.pm | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm index 198477ce6..6078ad96b 100644 --- a/FS/FS/CGI.pm +++ b/FS/FS/CGI.pm @@ -121,13 +121,11 @@ Sends headers and an HTML error message, then exits. =cut sub eidiot { - #warn "eidiot depriciated"; + warn "eidiot depriciated"; idiot(@_); if (exists $ENV{MOD_PERL}) { - eval { - use Apache; - Apache::exit(); - }; + require Apache; + Apache::exit(); } else { exit; } |