Fix windows temp path

This commit is contained in:
Andros Fenollosa 2021-08-08 09:01:01 +02:00
parent 988cee0f1e
commit 9171d840cc
2 changed files with 3 additions and 3 deletions

View File

@ -1,4 +1,4 @@
(defproject rsspaper "1.1.1" (defproject rsspaper "1.1.2"
:description "RSSpaper" :description "RSSpaper"
:url "https://github.com/tanrax/RSSpaper" :url "https://github.com/tanrax/RSSpaper"
:license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0" :license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0"

View File

@ -20,7 +20,7 @@
file-index "index.html" file-index "index.html"
path-dist-index (str dir-dist "index.html") path-dist-index (str dir-dist "index.html")
zip-static "static.zip" zip-static "static.zip"
tmp-static "/tmp/rsspaper.zip"] tmp-static (str (fs/tmpdir) "/rsspaper.zip")]
;; Remove old index.html ;; Remove old index.html
(when (.exists (io/file path-dist-index)) (io/delete-file path-dist-index)) (when (.exists (io/file path-dist-index)) (io/delete-file path-dist-index))
;; Make dir dist ;; Make dir dist
@ -32,4 +32,4 @@
:articles (get-articles)}))) :articles (get-articles)})))
;; Make static ;; Make static
(copy-uri-to-file (str path-theme zip-static) tmp-static) (copy-uri-to-file (str path-theme zip-static) tmp-static)
(fsc/unzip tmp-static dir-dist))) (fsc/unzip tmp-static dir-dist)))