Skip Menu |

This queue is for tickets about the Perl6-Form CPAN distribution.

Report information
The Basics
Id: 20347
Status: new
Priority: 0/
Queue: Perl6-Form

Owner: Nobody in particular
Requestors: milardj [...]

Bug Information
Severity: Normal
Broken in: 0.04
Fixed in: (no value)

Subject: Infinite loop if page->{length} is < then length of the format
Download (untitled) / with headers
text/plain 518b
Infinite loop is created when the defined page length is less then what is needed to print out the text created by a call to form(). To replicate change length to 1 (from 15) in In make_page() - because we never enter the following for loop: for my $row (0..$maxheight-1) { push @text, join "",map $parts[$_][$row],0..$#parts; } The @text arry is never assigned to causing an infinite loop since the loop condition is never satisfied: while (@text < $bodylen && @{$section->{formatters}}) {

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to