From 1fd54b7aa0449bd16b484f289da7b5264161f967 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Tue, 8 Sep 2026 00:26:08 -0700
Subject: Move database initialization

---
 src/app.phel               | 3 +++
 src/controller/routes.phel | 8 ++------
 src/db.phel                | 9 +++++++++
 3 files changed, 14 insertions(+), 6 deletions(-)
 create mode 100644 src/db.phel

diff --git a/src/app.phel b/src/app.phel
index 8bb61c1..7df561f 100644
--- a/src/app.phel
+++ b/src/app.phel
@@ -1,8 +1,11 @@
 (ns lezer.app
   (:require lezer.controller.routes)
+  (:require lezer.db)
   (:require phel.router :as r)
   (:require phel.http :as h))
 
+(db/initialize-database)
+
 (def- router
   (r/router
    [["/" {:handler (fn [req]
diff --git a/src/controller/routes.phel b/src/controller/routes.phel
index 726f57b..b6335ca 100644
--- a/src/controller/routes.phel
+++ b/src/controller/routes.phel
@@ -5,12 +5,8 @@
   (:require phel.router :as r)
   (:require phel.http :as h)
   (:require phel.pdo)
-  (:require phel.string :as str))
-
-(def conn (pdo/connect "sqlite:test.db"))
-(pdo/exec conn "create table if not exists books (id integer primary key autoincrement, title varchar(255), subtitle varchar(255))")
-(pdo/exec conn "create table if not exists authors (id integer primary key autoincrement, name varchar(255))")
-(pdo/exec conn "create table if not exists authors_books (author_id integer, book_id integer)")
+  (:require phel.string :as str)
+  (:require lezer.db :refer [conn]))
 
 (defn index-handler [req router]
   (let [books (for [b :in (pdo/select conn "select * from books")]
diff --git a/src/db.phel b/src/db.phel
new file mode 100644
index 0000000..3f50ccc
--- /dev/null
+++ b/src/db.phel
@@ -0,0 +1,9 @@
+(ns lezer.db
+  (:require phel.pdo))
+
+(def conn (pdo/connect "sqlite:test.db"))
+
+(defn initialize-database []
+  (pdo/exec conn "create table if not exists books (id integer primary key autoincrement, title varchar(255), subtitle varchar(255))")
+  (pdo/exec conn "create table if not exists authors (id integer primary key autoincrement, name varchar(255))")
+  (pdo/exec conn "create table if not exists authors_books (author_id integer, book_id integer)"))
-- 
cgit v1.3-2-g0d8e