Skip Menu |

This queue is for tickets about the HTML-Format CPAN distribution.

Report information
The Basics
Id: 9602
Status: open
Priority: 0/
Queue: HTML-Format
People
Owner: Nobody in particular
Requestors: lulu [...] lululand.com
Cc:
AdminCc:
Bug Information
Severity: Normal
Broken in: 2.04
Fixed in: (no value)

History Show all quoted text
  Mon Jan 10 21:32:21 2005 Guest - Ticket created
Subject: HTML Text Formatter does not output lines containing blank spaces
An HTML file containing a line of NBSP does not generate a blank line from the HTML Text Formatter. For sample input, please use the same test file as bug #9600. I am running Perl 5.8.5, Linux FC3, i686, using HTML-Format 2.0.4.
  Mon Jan 10 21:33:00 2005 Guest - Correspondence added
From: lulu [...] lululand.com
I am attaching a patch that fixes this problem. [guest - Mon Jan 10 21:32:21 2005]: Show quoted text
> > An HTML file containing a line of NBSP does not generate a blank line > from the HTML Text Formatter. > > For sample input, please use the same test file as bug #9600. > > I am running Perl 5.8.5, Linux FC3, i686, using HTML-Format 2.0.4.
--- FormatText.pm.sav 2004-06-02 00:48:28.000000000 -0700 +++ FormatText.pm 2005-01-10 17:19:19.654625320 -0800 @@ -190,11 +190,6 @@ $text =~ tr/\xA0\xAD/ /d; - if ($text =~ /^\s*$/) { - $self->{hspace} = 1; - return; - } - if (defined $self->{vspace}) { if ($self->{out}) { $self->nl while $self->{vspace}-- >= 0; @@ -204,6 +199,11 @@ $self->{hspace} = 0; } + if ($text =~ /^\s*$/) { + $self->{hspace} = 1; + return; + } + if ($self->{hspace}) { if ($self->{curpos} + length($text) > $self->{rm}) { # word will not fit on line; do a line break
  Fri Apr 15 11:31:23 2011 nigel.metheringham [...] gmail.com - Correspondence added
considering this with 9600
  Fri Apr 15 11:31:24 2011 The RT System itself - Status changed from 'new' to 'open'