diff options
| -rw-r--r-- | perl-install/interactive_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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") { |