From: Will Budic <redacted>
Date: Sun, 23 Feb 2020 00:40:48 +0000 (+1100)
Subject: Added future LOGCATSREF, for multiple categories per log.
X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=7a782b5005e642e48718f2a0d7b492e06e341b10;p=LifeLog.git

Added future LOGCATSREF, for multiple categories per log.
---

diff --git a/htdocs/cgi-bin/login_ctr.cgi b/htdocs/cgi-bin/login_ctr.cgi
index 2d2112a..04cfe22 100755
--- a/htdocs/cgi-bin/login_ctr.cgi
+++ b/htdocs/cgi-bin/login_ctr.cgi
@@ -287,6 +287,11 @@ sub checkCreateTables {
     #Have cats been wiped out?
     $changed = 1 if Settings::countRecordsIn($db, 'CAT') == 0;
 
+    #TODO Multiple cats per log future table.
+    if(!$curr_tables{'LOGCATSREF'}) {
+        $db->do(&Settings::createLOGCATSREFStmt);
+    }
+
     if(!$curr_tables{'AUTH'}) {
         $db->do(&Settings::createAUTHStmt);
         my $st = $db->prepare('INSERT INTO AUTH VALUES (?,?,?,?);');
diff --git a/htdocs/cgi-bin/system/modules/Settings.pm b/htdocs/cgi-bin/system/modules/Settings.pm
index b48ec7d..3ef07bd 100644
--- a/htdocs/cgi-bin/system/modules/Settings.pm
+++ b/htdocs/cgi-bin/system/modules/Settings.pm
@@ -119,6 +119,7 @@ return qq(
     CREATE INDEX idx_auth_name_passw ON AUTH (ALIAS, PASSW);
 )}
 sub createNOTEStmt {return qq(CREATE TABLE NOTES (LID INTEGER PRIMARY KEY NOT NULL, DOC TEXT);)}
+sub createLOGCATSREFStmt {return qq(CREATE TABLE LOGCATSREF (LID INTEGER NOT NULL, CID TINY NOT NULL);)}
 
 sub getConfiguration {
     my $db = shift;