This queue is for tickets about the Text-ASCIITable CPAN distribution.

Report information
The Basics
Id:
123743
Status:
new
Priority:
Low/Low

People
Owner:
Nobody in particular
Requestors:
mail [...] janno.nl
Cc:
AdminCc:

BugTracker
Severity:
Normal
Broken in:
(no value)
Fixed in:
(no value)



Subject: Indentation of text is being ignored
Hello Håkon! I ran into the problem that text with indentation will result in the removal of the preceding spaces. In the project I use the indentation is very important. The bug was found in the Wrap.pm module. Hereby I supply a patch for that module. Best, Janno Schouwenburg
Subject: PatchIndent.diff
--- /Library/Perl/5.18/Text/ASCIITable/Wrap.pm 2017-11-25 21:50:24.000000000 +0100 +++ Wrap.pm 2017-11-25 21:52:46.000000000 +0100 @@ -48,8 +48,9 @@ my @result; my $line=''; $nostrict = defined($nostrict) && $nostrict == 1 ? 1 : 0; - for (split(/ /,$text)) { - my $spc = $line eq '' ? 0 : 1; + my $index=0; + for (split(/ /,$text)) { + my $spc = $index++ == 0 ? 0 : 1; my $len = length($line); my $newlen = $len + $spc + length($_); if ($len == 0 && $newlen > $width) {


This service runs on Request Tracker, is sponsored by The Perl Foundation, and maintained by Best Practical Solutions.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.