summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/ugtk2.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 3c9b32e64..16e4bf58a 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -786,8 +786,8 @@ sub string_height {
}
sub get_text_coord {
- my ($text, $widget4style, $max_width, $currentx, $currenty, $o_wrap_char) = @_;
- my $wrap_char = $o_wrap_char || ' ';
+ my ($text, $widget4style, $max_width, $currentx, $currenty) = @_;
+ my $wrap_char = ' ';
my @lines;
my $current_text;
my @t = split($wrap_char, $text);