From f59b95b9e56f59b0ce4cf696f82430bf480c1405 Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Wed, 24 Aug 2005 11:06:23 +0000 Subject: cosmetics fix --- perl-install/standalone/draksambashare | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/draksambashare b/perl-install/standalone/draksambashare index d5eebf27d..3820c5a47 100755 --- a/perl-install/standalone/draksambashare +++ b/perl-install/standalone/draksambashare @@ -241,8 +241,7 @@ sub modify_entry { my $button = Gtk2::Button->new_from_stock('gtk-open'); $button->signal_connect(clicked => sub { $file_dialog->show }); - my $w = ugtk2->new(N("DrakSamba entry"), - icon => "/usr/lib/libDrakX/icons/drakfirewall.png"); + my $w = ugtk2->new(N("DrakSamba entry")); $iter = $selection->get_selected; $iter or info_dialog(N("Error"), N("Please add a Samba share to be able to modify it.")) and return; @@ -438,8 +437,6 @@ $treeview->signal_connect(button_press_event => sub { my $selection = $treeview->get_selection; my $iter = $selection->get_selected; if ($iter) { - my $path = $model->get_path($iter); - my $i = ($path->get_indices)[0]; modify_entry($model, $treeview) if $event->type eq '2button-press'; } }); -- cgit v1.2.1