From f8e19ee4da81986e6a6ab311cb37fd2f6b227a70 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 28 May 2002 15:42:26 +0000 Subject: remove typo fix when it's not a fix :-) --- perl-install/interactive_gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm index c8c6238fe..3abdb065e 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 = sub { + my $set_node_state_tree; $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