37 lines
1.1 KiB
Clojure
37 lines
1.1 KiB
Clojure
(ns yenu.test.db.core
|
|
(:require [yenu.db.core :refer [*db*] :as db]
|
|
[luminus-migrations.core :as migrations]
|
|
[clojure.test :refer :all]
|
|
[clojure.java.jdbc :as jdbc]
|
|
[yenu.config :refer [env]]
|
|
[mount.core :as mount]))
|
|
|
|
(use-fixtures
|
|
:once
|
|
(fn [f]
|
|
(mount/start
|
|
#'yenu.config/env
|
|
#'yenu.db.core/*db*)
|
|
(migrations/migrate ["migrate"] (select-keys env [:database-url]))
|
|
(f)))
|
|
|
|
(deftest test-users
|
|
(jdbc/with-db-transaction [t-conn *db*]
|
|
(jdbc/db-set-rollback-only! t-conn)
|
|
(is (= 1 (db/create-user!
|
|
t-conn
|
|
{:id "1"
|
|
:first_name "Sam"
|
|
:last_name "Smith"
|
|
:email "sam.smith@example.com"
|
|
:pass "pass"})))
|
|
(is (= {:id "1"
|
|
:first_name "Sam"
|
|
:last_name "Smith"
|
|
:email "sam.smith@example.com"
|
|
:pass "pass"
|
|
:admin nil
|
|
:last_login nil
|
|
:is_active nil}
|
|
(db/get-user t-conn {:id "1"})))))
|