From 88945cb8cd27a11295159cb85944d00180280d61 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
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/keyboarddrake | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install/standalone/keyboarddrake')

diff --git a/perl-install/standalone/keyboarddrake b/perl-install/standalone/keyboarddrake
index e5137530c..7940726fa 100755
--- a/perl-install/standalone/keyboarddrake
+++ b/perl-install/standalone/keyboarddrake
@@ -26,7 +26,7 @@ if (my ($kb) = grep { !/^-/ } @ARGV) {
     $in = 'interactive'->vnew('su', 'keyboard');
 
   begin:
-    $::isEmbedded and kill USR2, $::CCPID;
+    $::isEmbedded and kill 'USR2', $::CCPID;
   choose:
     $keyboard->{KEYBOARD} = $in->ask_from_listf(_("Keyboard"),
 						_("Please, choose your keyboard layout."),
@@ -59,7 +59,7 @@ keyboard::write($keyboard);
 
 end:
 if ($::isEmbedded) {
-    kill(USR1, $::CCPID);
+    kill('USR1', $::CCPID);
     $keyboard = '';
     goto begin;
 } else {
-- 
cgit v1.2.1