From 658aab99e4507d731fe436b4517d26381df5c72a Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 28 May 2002 15:03:47 +0000 Subject: small typo --- perl-install/interactive_gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/interactive_gtk.pm') diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index 3abdb065e..c8c6238fe 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -638,7 +638,7 @@ sub ask_browse_tree_info_refW { } $tree->node_set_pixmap($node, 1, $pix{$state}[0], $pix{$state}[1]); }; - my $set_node_state_tree; $set_node_state_tree = sub { + my $set_node_state_tree = sub { my ($node, $state) = @_; unless ($pix{$state}) { foreach ("$ENV{SHARE_PATH}/$state.png", "$ENV{SHARE_PATH}/rpm-$state.png") { -- cgit v1.2.1