From 15ed2f5822c7185a2ad0fd7350f2654a816585bb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 4 Mar 2013 19:10:40 +0000 Subject: simplify --- perl-install/install/steps_gtk.pm | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) (limited to 'perl-install/install') diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index b8e87ebaf..b6f66f0dc 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -311,9 +311,7 @@ sub reallyChooseDesktop { 0, $w->create_okcancel(N("Next"), undef, '', [ gtknew('Install_Button', text => N("Help"), clicked => sub { - interactive::gtk::display_help( - $o, - { interactive_help_id => 'chooseDesktop' }); + interactive::gtk::display_help($o, { interactive_help_id => 'chooseDesktop' }); }), undef, 1 ]) ])); $w->main; @@ -509,9 +507,7 @@ sub choosePackagesTree { }, auto_deps => N("Show automatically selected packages"), interactive_help => sub { - interactive::gtk::display_help($o, - { interactive_help_id => - 'choosePackagesTree' }) }, + interactive::gtk::display_help($o, { interactive_help_id => 'choosePackagesTree' }) }, ok => N("Install"), cancel => N("Previous"), -- cgit v1.2.1