add read-string
This commit is contained in:
parent
0ae50e7673
commit
c7a7cac61a
1 changed files with 5 additions and 2 deletions
|
|
@ -1,9 +1,11 @@
|
||||||
(ns scittle.qlkit
|
(ns scittle.qlkit
|
||||||
(:require [qlkit.core :as ql :refer-macros [defcomponent*]]
|
(:require [qlkit.core :as ql :refer-macros [defcomponent*]]
|
||||||
|
[create-react-class :refer [createReactClass]]
|
||||||
[sci.core :as sci]
|
[sci.core :as sci]
|
||||||
[scittle.core :as scittle]
|
[scittle.core :as scittle]
|
||||||
[sablono.core :as html :refer-macros [html html*]]
|
[sablono.core :as html :refer-macros [html html*]]
|
||||||
[sablono.interpreter :as si]))
|
[sablono.interpreter :as si]
|
||||||
|
[cljs.reader :refer [read-string]]))
|
||||||
|
|
||||||
(def qns (sci/create-ns 'qlkit.core nil))
|
(def qns (sci/create-ns 'qlkit.core nil))
|
||||||
|
|
||||||
|
|
@ -37,7 +39,8 @@
|
||||||
'mount (sci/copy-var ql/mount qns)
|
'mount (sci/copy-var ql/mount qns)
|
||||||
|
|
||||||
'classes (sci/copy-var ql/classes qns)
|
'classes (sci/copy-var ql/classes qns)
|
||||||
'random-uuid (sci/copy-var random-uuid-fn qns)})
|
'random-uuid (sci/copy-var random-uuid-fn qns)
|
||||||
|
'read-string (sci/copy-var read-string qns)})
|
||||||
|
|
||||||
(def sns (sci/create-ns 'sablono.core nil))
|
(def sns (sci/create-ns 'sablono.core nil))
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue