diff options
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/CGI.pm | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm index 47c034e..1e8fca6 100644 --- a/FS/FS/CGI.pm +++ b/FS/FS/CGI.pm @@ -123,9 +123,14 @@ Sends headers and an HTML error message, then exits. sub eidiot { #warn "eidiot depriciated"; idiot(@_); - #exit; - use Apache; - Apache::exit; + if (exists $ENV{MOD_PERL}) { + eval { + use Apache; + Apache::exit(); + }; + } else { + exit; + } } =item popurl LEVEL |