From ff0c121e63aca6ef7458d22d8a17c656d793ad73 Mon Sep 17 00:00:00 2001
From: Craig Oates <craig@craigoates.net>
Date: Sat, 10 Sep 2022 22:16:55 +0100
Subject: [PATCH] create user class and add to database table.

---
 ritherdon-archive.asd | 3 ++-
 src/database.lisp     | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/ritherdon-archive.asd b/ritherdon-archive.asd
index a448aec..945e2e7 100644
--- a/ritherdon-archive.asd
+++ b/ritherdon-archive.asd
@@ -69,7 +69,8 @@
 
                (:module "src/models"
                         :components
-                        ((:file "models")))
+                        ((:file "models")
+			 (:file "user")))
 
                (:static-file "README.md")))
 
diff --git a/src/database.lisp b/src/database.lisp
index ffe8f1b..a90962e 100644
--- a/src/database.lisp
+++ b/src/database.lisp
@@ -3,7 +3,7 @@
 ;;; DB connection, migrations.
 ;;;
 
-(defparameter *tables* '(product)
+(defparameter *tables* '(product user)
   "List of the DB tables that need to be checked for migrations.")
 
 (defun connect (&optional (db-name *db-name*))