summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/interactive')
-rw-r--r--perl-install/interactive/newt.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/interactive/newt.pm b/perl-install/interactive/newt.pm
index 3e8af3199..b94ae9193 100644
--- a/perl-install/interactive/newt.pm
+++ b/perl-install/interactive/newt.pm
@@ -392,9 +392,9 @@ sub wait_message_endW {
}
sub simplify_string {
- my ($s, $width) = @_;
+ my ($s, $o_width) = @_;
$s =~ s/\n/ /g;
- $s = substr($s, 0, $width || 40); #- truncate if too long
+ $s = substr($s, 0, $o_width || 40); #- truncate if too long
$s;
}