From f518ad1061cdb0ce6612dc2537ad19cf53bc58a7 Mon Sep 17 00:00:00 2001 From: Metabox Date: Thu, 25 Apr 2019 16:34:26 +1000 Subject: [PATCH] style --- htdocs/cgi-bin/remove.cgi | 18 ++++++++++++------ 1 file changed, 12 insertions(+), 6 deletions(-) diff --git a/htdocs/cgi-bin/remove.cgi b/htdocs/cgi-bin/remove.cgi index c6c7a20..c3e4cb8 100755 --- a/htdocs/cgi-bin/remove.cgi +++ b/htdocs/cgi-bin/remove.cgi @@ -69,7 +69,7 @@ my $stmS = "SELECT rowid, ID_CAT, DATE, LOG from LOG WHERE"; my $stmE = " ORDER BY DATE DESC, rowid DESC;"; my $tbl = '
- '; + '; my $datediff = $cgi->param("datediff"); @@ -187,15 +187,21 @@ if($rv < 0) { my $r_cnt = 0; +my $rs = "r1"; while(my @row = $st->fetchrow_array()) { my $ct = $hshCats{$row[1]}; my $dt = DateTime::Format::SQLite->parse_datetime( $row[2] ); - - $tbl = $tbl . '" . - '" . - '\n". - ''; + $tbl = $tbl . '" . + '" . + '\n". + ''; + if($rs eq "r1"){ + $rs = "r0"; + } + else{ + $rs = "r1"; + } $r_cnt++; } my $plural = ""; -- 2.34.1
Date TimeLogCategory
Date TimeLogCategory
'. $dt->ymd . "' . $dt->hms . "' . $row[3] . "' . $ct. '
'. $dt->ymd . "' . $dt->hms . "' . $row[3] . "' . $ct. '