From 5c9b9a1deffdbefc84a1346e29b136fda703bfe7 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 18 Feb 2005 18:07:14 +0000
Subject: fix typo

---
 perl-install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/any.pm')

diff --git a/perl-install/any.pm b/perl-install/any.pm
index ccc68723d..1fd405b5a 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1039,7 +1039,7 @@ sub ask_window_manager_to_logout_then_do {
 	my $nb;
 	for ($nb = 30; $nb && -e "/proc/$pid"; $nb--) { sleep 1 }
 	system($action) if $nb;
-    ), $wm, $pid;
+    ), $wm, $pid, $action;
 }
 
 sub alloc_raw_device {
-- 
cgit v1.2.1