From: Will Budic <redacted>
Date: Wed, 4 Mar 2020 01:52:14 +0000 (+1100)
Subject: Bug 20 fix.
X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=6da1f1bcb10db31af8f07f1a4b0245dee43bd557;p=LifeLog.git

Bug 20 fix.
---

diff --git a/htdocs/cgi-bin/login_ctr.cgi b/htdocs/cgi-bin/login_ctr.cgi
index 3cf8703..7f783dd 100755
--- a/htdocs/cgi-bin/login_ctr.cgi
+++ b/htdocs/cgi-bin/login_ctr.cgi
@@ -182,7 +182,7 @@ sub checkCreateTables {
     my ($pst, $sql,$rv, $changed) = 0;
     # We live check database for available tables now only once.
     # If brand new database, this sill returns fine an empty array.
-    my $pst = Settings::selectRecords($db,"SELECT name FROM sqlite_master WHERE type='table' or type='view';");
+    $pst = Settings::selectRecords($db,"SELECT name FROM sqlite_master WHERE type='table' or type='view';");
     my %curr_tables = ();
     while(my @r = $pst->fetchrow_array()){
         $curr_tables{$r[0]} = 1;