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/drakconnect | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/drakconnect') diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 21fa2b9e9..903d9d0b3 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -322,7 +322,7 @@ $combo1->entry->signal_connect('changed', sub { $window1->show_all(); $_->hide foreach ($button1, $button3); Gtk->main_iteration while Gtk->events_pending; -$::isEmbedded and kill USR2, $::CCPID; +$::isEmbedded and kill 'USR2', $::CCPID; my $tag = Gtk->timeout_add(4000, \&update2); Gtk->main; Gtk->exit(0); @@ -413,7 +413,7 @@ sub update2 { } sub quit_global { - $::isEmbedded ? kill(USR1, $::CCPID) : Gtk->exit(0); + $::isEmbedded ? kill('USR1', $::CCPID) : Gtk->exit(0); } sub configure_lan { -- cgit v1.2.1