diff options
| -rwxr-xr-x | perl-install/standalone/drakautoinst | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index 5a05d744e..e811a2e31 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -118,13 +118,16 @@ quit_global($in, 0); sub quit_global { my ($in, $exitcode) = @_; - $::isEmbedded ? kill USR1, $::CCPID : $in->exit(0); + $::isEmbedded ? kill USR1, $::CCPID : $in->exit($exitcode); goto begin; } #------------------------------------------------- #- $Log$ +#- Revision 1.5 2001/08/29 21:58:24 gc +#- quit_global +#- #- Revision 1.4 2001/08/26 14:34:10 gc #- require -> use #- |