From 6288c4410419d0877ba8f0425ca149f99ea33396 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 30 Aug 2007 12:55:01 +0000 Subject: (summary_prompt) enable to set banner icon & title per summary item --- perl-install/install/steps_gtk.pm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perl-install/install') diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm index b21a04cf7..5a81ce00d 100644 --- a/perl-install/install/steps_gtk.pm +++ b/perl-install/install/steps_gtk.pm @@ -563,7 +563,10 @@ sub summary_prompt { push @table, [], [ gtknew('HBox', spacing => 30, children_tight => [ '', $e->{widget} ]), gtknew('Button', text => N("Configure"), clicked => sub { $w->{rwindow}->hide; + my ($old_icon, $old_title) = get_default_step_items(); + set_default_step_items($e->{banner_icon} || $old_icon, $e->{banner_title} || $old_title); $e->{clicked}(); + set_default_step_items($old_icon, $old_title); $w->{rwindow}->show; $set_entry_labels->(); }) ]; -- cgit v1.2.1