17 lines
351 B
Clojure
17 lines
351 B
Clojure
(ns blog.db
|
|
(:require ["pg" :refer [Client]]
|
|
[blog.env :as env]))
|
|
|
|
(defn create-client
|
|
"Create a new client for Postgres using enviroment variables."
|
|
[]
|
|
(->> (env/get-database-credentials)
|
|
(cljs.core/clj->js)
|
|
(new Client)))
|
|
|
|
(defn connect-client
|
|
"Connect a client to the database"
|
|
[client]
|
|
(. client connect))
|
|
|