This commit was merged in pull request #26.
This commit is contained in:
@@ -17,13 +17,17 @@
|
|||||||
|
|
||||||
(def ^:dynamic *worker*)
|
(def ^:dynamic *worker*)
|
||||||
|
|
||||||
(def ^:private prelude-file
|
;; 외부의 브로그램이 JVM resource를 사용 위해서 파일 시스템에서 써야
|
||||||
(fs/create-temp-file {:prefix "doerg-prelude-"
|
;; 합니다.
|
||||||
:suffix ".tex"}))
|
(defonce ^:private prelude-file
|
||||||
|
(-> (fs/create-temp-file {:prefix "doerg-prelude-"
|
||||||
|
:suffix ".tex"})
|
||||||
|
fs/file))
|
||||||
|
|
||||||
(defn worker []
|
(defn worker []
|
||||||
(let [doerg-temml-worker (-> cfg/*cfg* ::doerg/doerg-temml-worker)]
|
(let [doerg-temml-worker (-> cfg/*cfg* ::doerg/doerg-temml-worker)]
|
||||||
(when-not (fs/exists? prelude-file)
|
(when (or (not (fs/exists? prelude-file))
|
||||||
|
(zero? (fs/size prelude-file)))
|
||||||
(-> "net/deertopia/doerg/prelude.tex"
|
(-> "net/deertopia/doerg/prelude.tex"
|
||||||
io/resource
|
io/resource
|
||||||
io/input-stream
|
io/input-stream
|
||||||
|
|||||||
Reference in New Issue
Block a user