From a59b279c3cb74856656c763ad07943d1fdaddc55 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 13 Apr 2001 14:55:45 +0000
Subject: fixed very old typo not encountered before;

---
 perl-install/install_steps_gtk.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_steps_gtk.pm')

diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 4dce16d39..c62145598 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -264,7 +264,7 @@ sub reallyChooseGroups {
 	my $file = do {
 	    my $f = "$ENV{SHARE_PATH}/icons/" . ($o->{compssUsers}{$e}{icons} || 'default');
 	    -e "$f.png" or $f .= "_section";
-	    -e "$f.png" or $f = '$ENV{SHARE_PATH}/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