From: Will Budic Date: Sun, 23 Feb 2020 06:59:51 +0000 (+1100) Subject: Removed old html select options code. X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=0ad924e09412786004f281b4fd17bb2d1acef8c8;p=LifeLog.git Removed old html select options code. --- diff --git a/.gitignore b/.gitignore index fd29628..ef44375 100644 --- a/.gitignore +++ b/.gitignore @@ -53,3 +53,4 @@ log/thttpd.log htdocs/thttpd.pid htdocs/cgi-bin/wsrc/examples.css dbLifeLog/*.db-journal +log/*.log diff --git a/htdocs/cgi-bin/main.cgi b/htdocs/cgi-bin/main.cgi index 442e931..5b8ce50 100755 --- a/htdocs/cgi-bin/main.cgi +++ b/htdocs/cgi-bin/main.cgi @@ -233,41 +233,13 @@ print qq(## Using db -> $dsn\n) if $DEBUG; $st = $db->prepare($sqlCAT); $st->execute() or LifeLogException->throw($DBI::errstri); -my $cats = qq('; -$cats_v .= ''; -$cats_x .= ''; + for my $key ( keys %hshDesc ) { my $kv = $hshDesc{$key}; @@ -843,6 +813,12 @@ _TXT ); my $sss_checked = 'checked' if &isInViewMode; my $divxc = 'Excludes:'; + my ($catselected, $idx_cat) = '-- Select --', 0; + if($rs_cat_idx){ + $catselected = $hshCats{$rs_cat_idx}; + $idx_cat = $rs_cat_idx; + + } if(@xc_lst){#Do list of excludes, past from browser in form of category id's. my $xcls =""; foreach(@xc_lst){ $xcls .= $hshCats{$_}.','} @@ -855,7 +831,7 @@ _TXT View by Category: - --Select -- + $catselected