From 435c4d078bd65e3d877fb5311ab2e90fc9ba53c9 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 4 Aug 2001 11:59:49 +0000 Subject: (ask_browse_tree_info_refW): s/wait_msg/wait_message/ (wait_msg doesn't exist anywhere, it must be a fpons typo) --- 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 2852f9ad5..445586d3e 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -636,7 +636,7 @@ sub ask_browse_tree_info_refW { foreach my $ic (@{$common->{icons} || []}) { push @toolbar, ( $ic->{icon} => [ $ic->{help}, sub { if ($ic->{code}) { - my $w = $ic->{wait_msg} && $o->wait_message('', $ic->{wait_msg}); + my $w = $ic->{wait_message} && $o->wait_message('', $ic->{wait_message}); $ic->{code}(); $add_nodes->($common->{state}{flat}); } -- cgit v1.2.1