diff options
-rw-r--r-- | perl-install/mygtk2.pm | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index f8f52f547..3d594ab7c 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -312,7 +312,6 @@ sub _gtk__ComboBox { if (my $text_ref = delete $opts->{text_ref}) { my $set = sub { my $val = may_apply($w->{format}, $$text_ref); - warn "setting $val\n"; eval { $w->set_active(find_index { $_ eq $val } @{$w->{formatted_list}}) }; }; $w->signal_connect(changed => sub { |