summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 245d5c4e2..bef9fe9ea 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -1683,7 +1683,7 @@ sub set_text {
my $val_index = find_index { $_ eq $val } @{$w->{strings}};
$w->set_active($val_index);
};
- warn qq(impossible to lookup "$val":\n$@) if $@;
+ internal_error(qq(impossible to lookup "$val":\n\t) . chomp_($@)) if $@;
}