From 88945cb8cd27a11295159cb85944d00180280d61 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 5 Aug 2002 13:29:39 +0000 Subject: replace "kill USR1" with "kill 'USR1'" (and same for USR2) (so that 'use strict' works) --- perl-install/standalone/drakgw | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/drakgw') diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw index ace20447d..b31721dae 100755 --- a/perl-install/standalone/drakgw +++ b/perl-install/standalone/drakgw @@ -592,17 +592,17 @@ Click on Configure to launch the setup wizard.", $setup_state)); my $button_conf = new Gtk::Button _("Configure"); $button_conf->signal_connect(clicked => sub { system("/usr/sbin/drakgw --wizard"); - kill(USR1, $::CCPID); + kill('USR1', $::CCPID); }); $bbox1->add($button_conf); my $button_cancel = new Gtk::Button _("Cancel"); $button_cancel->signal_connect(clicked => sub { - kill(USR1, $::CCPID); + kill('USR1', $::CCPID); }); $bbox1->add($button_cancel); $window1->show_all(); Gtk->main_iteration while Gtk->events_pending; - $::isEmbedded and kill USR2, $::CCPID; + $::isEmbedded and kill 'USR2', $::CCPID; Gtk->main; Gtk->exit(0); -- cgit v1.2.1