summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2001-08-29 21:58:24 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2001-08-29 21:58:24 +0000
commit1eb4032835f21848b14ca0eec83c203e7b8b46dd (patch)
treecade45fd3ea94ee99a09904ea48e68774fd4ffb8 /perl-install/standalone
parentb8c8b2eec9dd0faa1fc4e09278fe13b066b4ca7a (diff)
downloaddrakx-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')
-rwxr-xr-xperl-install/standalone/drakautoinst5
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
#-