From 43b9722f1b20f9384da28ee51b6c130e19e1a5bb Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Mon, 4 Mar 2013 19:10:31 +0000
Subject: drop unused parameter

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

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

diff --git a/perl-install/services.pm b/perl-install/services.pm
index 2b73673d0..3ef2a0500 100644
--- a/perl-install/services.pm
+++ b/perl-install/services.pm
@@ -211,7 +211,7 @@ sub ask_ {
                                interactive_help => sub { 
                                    interactive::gtk::display_help($in,
                                                                { interactive_help_id => 
-                                                                   'configureServices' }, $::main_window) },
+                                                                   'configureServices' }) },
 			      }) or return $l, $on_services; #- no change on cancel.
     [ grep { $services{$_} } @$l ];
 }
-- 
cgit v1.2.1