From f0e226d2ee9b2a3b2cf122d4be445f9920fef59e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 5 Aug 2003 14:08:18 +0000 Subject: remove stock icons (per IHM team request) --- 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 aa55029a7..099241bd2 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -216,7 +216,7 @@ sub ask_standalone_gtk { my ($started, $action) = $update_service->($service, gtkset_justify($l, 'left')); [ gtkpack__(Gtk2::HBox->new(0,0), $_), gtkpack__(Gtk2::HBox->new(0,0), $l), - gtkpack__(Gtk2::HBox->new(0,0), gtksignal_connect(Gtk2::Button->new_from_stock('gtk-dialog-info'), clicked => sub { $display->($infos) })), + gtkpack__(Gtk2::HBox->new(0,0), gtksignal_connect(Gtk2::Button->new(N("Info")), clicked => sub { $display->($infos) })), gtkpack__(Gtk2::HBox->new(0,0), gtkset_active(gtksignal_connect( Gtk2::CheckButton->new(N("On boot")), clicked => sub { if ($_[0]->get_active) { -- cgit v1.2.1