diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2001-08-29 21:58:24 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2001-08-29 21:58:24 +0000 |
| commit | 1eb4032835f21848b14ca0eec83c203e7b8b46dd (patch) | |
| tree | cade45fd3ea94ee99a09904ea48e68774fd4ffb8 /perl-install/standalone/drakautoinst | |
| parent | b8c8b2eec9dd0faa1fc4e09278fe13b066b4ca7a (diff) | |
| download | drakx-1eb4032835f21848b14ca0eec83c203e7b8b46dd.tar drakx-1eb4032835f21848b14ca0eec83c203e7b8b46dd.tar.gz drakx-1eb4032835f21848b14ca0eec83c203e7b8b46dd.tar.bz2 drakx-1eb4032835f21848b14ca0eec83c203e7b8b46dd.tar.xz drakx-1eb4032835f21848b14ca0eec83c203e7b8b46dd.zip | |
quit_global
Diffstat (limited to 'perl-install/standalone/drakautoinst')
| -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 #- |