diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-08-05 13:29:39 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-08-05 13:29:39 +0000 |
| commit | 88945cb8cd27a11295159cb85944d00180280d61 (patch) | |
| tree | b25ff270988310768753414580b88cedc496ca91 /perl-install/standalone/drakautoinst | |
| parent | 5889fd12bc1433d4500fc7349fe26bbc8a7a7548 (diff) | |
| download | drakx-backup-do-not-use-88945cb8cd27a11295159cb85944d00180280d61.tar drakx-backup-do-not-use-88945cb8cd27a11295159cb85944d00180280d61.tar.gz drakx-backup-do-not-use-88945cb8cd27a11295159cb85944d00180280d61.tar.bz2 drakx-backup-do-not-use-88945cb8cd27a11295159cb85944d00180280d61.tar.xz drakx-backup-do-not-use-88945cb8cd27a11295159cb85944d00180280d61.zip | |
replace "kill USR1" with "kill 'USR1'" (and same for USR2)
(so that 'use strict' works)
Diffstat (limited to 'perl-install/standalone/drakautoinst')
| -rwxr-xr-x | perl-install/standalone/drakautoinst | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index dc18dfca8..9eedb1494 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -37,7 +37,7 @@ $::direct = 1; #DEBUG my $in = 'interactive'->vnew('su', 'default'); begin: -$::isEmbedded and kill USR2, $::CCPID; +$::isEmbedded and kill 'USR2', $::CCPID; my $imagefile = "/root/drakx/replay_install.img"; -f $imagefile or $in->ask_okcancel(_("Error!"), @@ -213,7 +213,7 @@ if (!$::isEmbedded && $in->isa('interactive::gtk')) { # ); # $notebook->set_tab_pos('left'); # $::isEmbedded and Gtk->main_iteration while Gtk->events_pending; - $::isEmbedded and kill (12, $::CCPID); + $::isEmbedded and kill ('USR2', $::CCPID); $W->main; # $W->destroy(); } @@ -244,7 +244,7 @@ quit_global($in, 0); sub quit_global { my ($in, $exitcode) = @_; - $::isEmbedded ? kill USR1, $::CCPID : $in->exit($exitcode); + $::isEmbedded ? kill 'USR1', $::CCPID : $in->exit($exitcode); goto begin; } |