refactoring nyse app into "app" ns

This commit is contained in:
anatoly 2015-10-20 08:53:09 -04:00
parent cd6a92ac58
commit a63c725dcb
6 changed files with 11 additions and 11 deletions

View file

@ -13,7 +13,7 @@
[clojure.test :as test]
;; [clojure.core.async :refer [>!! <!! >! <! go-loop alt! timeout]]
[clojure.tools.namespace.repl :refer [refresh refresh-all]]
[mount.app :refer :all]
[app :refer :all]
[mount :as app]))
(defn start []

View file

@ -8,7 +8,7 @@
:dependencies [[org.clojure/clojure "1.7.0"]]
:profiles {:dev {:source-paths ["dev"]
:profiles {:dev {:source-paths ["dev" "test/app"]
:dependencies [[yesql "0.5.1"]
[org.clojure/tools.namespace "0.2.11"]
[com.datomic/datomic-free "0.9.5327" :exclusions [joda-time]]

View file

@ -1,8 +1,8 @@
(ns mount.app
(ns app
(:require [datomic.api :as d]
[mount.utils.datomic :refer [touch]]
[mount.config :refer [app-config]]
[mount.nyse :as nyse]))
[app.utils.datomic :refer [touch]]
[app.config :refer [app-config]]
[app.nyse :as nyse]))
(defn create-schema [conn]
(let [schema [{:db/id #db/id [:db.part/db]

View file

@ -1,4 +1,4 @@
(ns mount.config
(ns app.config
(:require [mount :refer [defstate]]
[clojure.edn :as edn]
[clojure.tools.logging :refer [info]]))

View file

@ -1,8 +1,8 @@
(ns mount.nyse
(ns app.nyse
(:require [mount :refer [defstate]]
[mount.config :refer [app-config]]
[datomic.api :as d]
[clojure.tools.logging :refer [info]]))
[clojure.tools.logging :refer [info]]
[app.config :refer [app-config]]))
(defn- new-connection [conf]
(info "conf: " conf)

View file

@ -1,4 +1,4 @@
(ns mount.utils.datomic
(ns app.utils.datomic
(:require [datomic.api :as d]))
(defn entity [conn id]