gnatsweb/194: Audit-Trail word-wrap

[jfunk@ez2get.com]

>Number:         194
>Category:       gnatsweb
>Synopsis:       Audit-Trail word-wrap
>Confidential:   no
>Severity:       non-critical
>Priority:       low
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Thu May 17 19:54:01 PDT 2001
>Closed-Date:
>Last-Modified:
>Originator:     Jason Funk
>Release:        2.7
>Organization:
>Environment:
Linux
>Description:
On my browser the Audit-Trail (enclosed in a PRE block) would not word-wrap.  This is hard to read if you have a long -Why line.  I hacked a solution (see Fix).  Don't know if you have this fixed in 2.8.
>How-To-Repeat:

>Fix:
  # Massive hack on my part to cause Why text to be word-wrapped.
  # Word-wrapping is not required for PRE blocks.
  # Originally was:
  # print "<h3>Audit Trail:</h3>\n",
  #   $q->pre($q->escapeHTML($fields{'Audit-Trail'}));
  print "<h3>Audit Trail:</h3>\n";
  my $lines = $q->escapeHTML($fields{'Audit-Trail'});
  $lines =~ s/    /&nbsp;&nbsp;&nbsp;&nbsp;/gm;
  $lines =~ s/$/<br>/gm;
  $lines =~ s/<br>$//; # previous substitution added one too many <br>'s
  print $q->tt($lines);
>Release-Note:
>Audit-Trail:
>Unformatted: