From aacb1ecf4006e05ad0516d0b4b8b055672a7a194 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Wed, 4 Apr 2001 12:26:57 +0000 Subject: fixed to use SHARE_PATH instead of /usr/share --- perl-install/install_steps_gtk.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 7c0e6d916..18abb6251 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -269,9 +269,9 @@ sub reallyChooseGroups { my $help = translate($o->{compssUsers}{$e}{descr}); my $file = do { - my $f = "/usr/share/icons/" . ($o->{compssUsers}{$e}{icons} || 'default'); + my $f = "$ENV{SHARE_PATH}/icons/" . ($o->{compssUsers}{$e}{icons} || 'default'); -e "$f.png" or $f .= "_section"; - -e "$f.png" or $f = '/usr/share/icons/default_section'; + -e "$f.png" or $f = '$ENV{SHARE_PATH}/icons/default_section'; "$f.png"; }; my $check = Gtk::CheckButton->new($text); -- cgit v1.2.1