From d8ec21bed269b44c6ec416ebbbe2f43464d48d50 Mon Sep 17 00:00:00 2001 From: damien Date: Wed, 7 Feb 2001 05:11:52 +0000 Subject: updated wizard mode --- 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 b96a7d48c..8485d34ea 100644 --- a/perl-install/interactive_gtk.pm +++ b/perl-install/interactive_gtk.pm @@ -267,7 +267,7 @@ sub ask_from_entries_refW { $w->add($e->{icon}); $e->{icon}->show; }; - $w->signal_connect(clicked => sub { + $w->signal_connect(clicked => sub { $set->(${$e->{val}} = next_val_in_array(${$e->{val}}, $e->{list})); $changed->(); }); -- cgit v1.2.1