From 80b3161de0a5873db337ec84841f0c7eea0daab4 Mon Sep 17 00:00:00 2001 From: Metabox Date: Mon, 5 Aug 2019 11:41:13 +1000 Subject: [PATCH] RTF JSON page interation bettered. --- htdocs/cgi-bin/main.cgi | 56 +++++++++----- htdocs/cgi-bin/wsrc/main.css | 3 + htdocs/cgi-bin/wsrc/main.js | 140 ++++++++++++++++++++++++++++++----- 3 files changed, 162 insertions(+), 37 deletions(-) diff --git a/htdocs/cgi-bin/main.cgi b/htdocs/cgi-bin/main.cgi index 70861bf..2bac432 100755 --- a/htdocs/cgi-bin/main.cgi +++ b/htdocs/cgi-bin/main.cgi @@ -510,8 +510,7 @@ qq(\n); } if ( $rtf > 0 ) { - $log .= -qq(
); + $log .= qq(
); } $tbl .= qq( @@ -524,8 +523,17 @@ qq(
); - - ); + ); + + if ( $rtf > 0 ) { + $tbl .= qq( + +
+
+
+ ); + } + $tbl_rc += 1; if ( $REC_LIMIT > 0 && $tbl_rc == $REC_LIMIT ) { @@ -593,8 +601,10 @@ qq(
); } } - $tbl .= -qq([Show Again The Hidden By -> ] + $tbl .= <<_TXT; +Show All Again -> + @@ -610,12 +620,13 @@ qq([Show Again The Hidden By -> -); + +_TXT - my ( $sp1, $sp2 ); - $sp1 = ''; - $sp2 = -qq(); + my ( $sp1, $sp2, $sp3 ); + $sp1 = ''; + $sp2 = ''; + $sp3 = ''; my $frm = qq(
@@ -630,7 +641,7 @@ qq( . $today->ymd . " " . $today->hms . qq(">   -   +   Category: $cats

@@ -643,11 +654,11 @@ qq(  Amount: -   RTF Document +   RTF Document
  -
+ @@ -707,9 +718,10 @@ qq( print qq(