From 21918faa75dc49aa2e2f3bce19a9af5f25dc26f6 Mon Sep 17 00:00:00 2001 From: joy <> Date: Sun, 6 Apr 2003 09:45:50 -0800 Subject: [PATCH] [project @ 2003-04-06 10:45:50 by joy] added terse display mode. it's... terse. :) --- cgi/bugreport.cgi | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/cgi/bugreport.cgi b/cgi/bugreport.cgi index 35ff2697..6e003370 100755 --- a/cgi/bugreport.cgi +++ b/cgi/bugreport.cgi @@ -28,6 +28,7 @@ my $short = "#$ref"; my $msg = $param{'msg'} || ""; my $att = $param{'att'}; my $boring = ($param{'boring'} || 'no') eq 'yes'; +my $terse = ($param{'terse'} || 'no') eq 'yes'; my $reverse = ($param{'reverse'} || 'no') eq 'yes'; my $mbox = ($param{'mbox'} || 'no') eq 'yes'; @@ -253,7 +254,6 @@ while(my $line = ) { $this .= htmlsanit($entity->stringify); } $this = "$downloadHtml\n$this$downloadHtml" if $downloadHtml; - $downloadHtml = ''; # if ($normstate eq 'go' || $normstate eq 'go-nox') { if ($normstate ne 'html') { $this = "
\n$this
\n"; @@ -262,11 +262,14 @@ while(my $line = ) { $this .= " Full text available."; } $this = "$thisheader$this" if $thisheader && !( $normstate eq 'html' );; + $this = "$downloadHtml" if ($terse && $normstate ne 'html'); + $downloadHtml = ''; $thisheader = ''; + my $delim = $terse ? "

" : "


"; if ($reverse) { - $log = "$this\n
$log"; + $log = "$this\n$delim$log"; } else { - $log .= "$this\n
\n"; + $log .= "$this\n$delim\n"; } } -- 2.39.5