From e3bc96ce4e7897f4b2bfad12494b7f76eb926056 Mon Sep 17 00:00:00 2001 From: lukas Date: Fri, 27 Dec 2019 11:00:41 +0100 Subject: [PATCH] mob-seassion --- src/cryogen_core/compiler.clj | 78 ++++++++++++++++++++--------------- 1 file changed, 45 insertions(+), 33 deletions(-) diff --git a/src/cryogen_core/compiler.clj b/src/cryogen_core/compiler.clj index 1988a34..dbdcec0 100644 --- a/src/cryogen_core/compiler.clj +++ b/src/cryogen_core/compiler.clj @@ -239,7 +239,7 @@ [{:keys [blog-prefix page-root-uri debug?] :as params} pages] (when-not (empty? pages) (println (blue "compiling pages")) - (cryogen-io/create-folder (cryogen-io/path "/" blog-prefix page-root-uri)) + ;(cryogen-io/create-folder (cryogen-io/path "/" blog-prefix page-root-uri)) (doseq [{:keys [uri] :as page} pages] (println "-->" (cyan uri)) (when debug? @@ -494,44 +494,56 @@ author-root-uri theme debug? page-model page-root-uri resources] :as config} (read-config) - posts (map klipsify (add-prev-next (read-posts config))) - posts-by-tag (group-by-tags posts) - posts (tag-posts posts config) - latest-posts (->> posts (take recent-posts) vec) - klipsified-pages (map klipsify (read-pages config)) - modelled-pages (cond - (= page-model :flat) klipsified-pages - (= page-model :hierarchic) (hierarchic/build-hierarchic-map page-root-uri klipsified-pages)) - home-page (->> modelled-pages - (filter #(boolean (:home? %))) - (first)) - other-pages (->> modelled-pages - (remove #{home-page}) - (add-prev-next)) - params (merge config - {:today (java.util.Date.) - :title (:site-title config) - :active-page "home" - :tags (map (partial tag-info config) (keys posts-by-tag)) - :latest-posts latest-posts - :pages other-pages - :home-page (if home-page - home-page - (assoc (first latest-posts) :layout "home.html")) - :archives-uri (page-uri "archives.html" config) - :index-uri (page-uri "index.html" config) - :tags-uri (page-uri "tags.html" config) - :rss-uri (cryogen-io/path "/" blog-prefix rss-name) - :site-url (if (.endsWith site-url "/") (.substring site-url 0 (dec (count site-url))) site-url)}) - file-resource-path (str "file:resources/templates/themes/" theme) - classpath-resource-path (str "templates/themes/" theme)] + posts + (map klipsify (add-prev-next (read-posts config))) + posts-by-tag + (group-by-tags posts) + posts + (tag-posts posts config) + latest-posts + (->> posts (take recent-posts) vec) + klipsified-pages + (map klipsify (read-pages config)) + modelled-pages + (cond + (= page-model :flat) klipsified-pages + (= page-model :hierarchic) (hierarchic/build-hierarchic-map page-root-uri klipsified-pages)) + home-page + (->> modelled-pages + (filter #(boolean (:home? %))) + (first)) + other-pages + (->> modelled-pages + (remove #{home-page}) + (add-prev-next)) + params + (merge config + {:today (java.util.Date.) + :title (:site-title config) + :active-page "home" + :tags (map (partial tag-info config) (keys posts-by-tag)) + :latest-posts latest-posts + :pages other-pages + :home-page (if home-page + home-page + (assoc (first latest-posts) :layout "home.html")) + :archives-uri (page-uri "archives.html" config) + :index-uri (page-uri "index.html" config) + :tags-uri (page-uri "tags.html" config) + :rss-uri (cryogen-io/path "/" blog-prefix rss-name) + :site-url (if (.endsWith site-url "/") (.substring site-url 0 (dec (count site-url))) site-url)}) + file-resource-path + (str "file:resources/templates/themes/" theme) + classpath-resource-path + (str "templates/themes/" theme)] (when debug? (println (blue "debug: page-model:")) (println "\t-->" (cyan page-model)) (println (blue "debug: home-page:")) (println "\t-->" (cyan (-> params :home-page)))) ;; TODO: replace by file-resource-path or classpath-resource-path - (set-custom-resource-path! (str "file:resources/templates/themes/" theme)) + (println file-resource-path) + (set-custom-resource-path! file-resource-path) ;(cryogen-io/wipe-public-folder keep-files) (cp-io/delete-resource-recursive! (cp-io/path "resources/public" blog-prefix)) (println (blue "copying theme resources"))