From bacbe8a0ef513bad2122b6eeb47da325120cde3a Mon Sep 17 00:00:00 2001 From: tilpner Date: Sun, 22 Apr 2018 23:45:01 +0200 Subject: Add default database setup --- modules/0-db.rkt | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 modules/0-db.rkt diff --git a/modules/0-db.rkt b/modules/0-db.rkt new file mode 100644 index 0000000..71e28ab --- /dev/null +++ b/modules/0-db.rkt @@ -0,0 +1,13 @@ +#lang racket/base +(require irc/db irc/storage + racket/match db) + +; this is fineā„¢, meep is expected to run as its own user +(define data-dir (getenv "HOME")) + +(current-database + (sqlite3-connect #:database (build-path data-dir "meep.sqlite") + #:mode 'create)) + +(db-init) +(storage-init) -- cgit v1.2.3