diff options
| -rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 1fd405b5a..ad7552d37 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1035,7 +1035,7 @@ sub ask_window_manager_to_logout_then_do { open STDERR, ">&STDERR"; c::setsid(); exec 'perl', '-e', q( - my ($wm, $pid) = @ARGV; + my ($wm, $pid, $action) = @ARGV; my $nb; for ($nb = 30; $nb && -e "/proc/$pid"; $nb--) { sleep 1 } system($action) if $nb; |