commit f69a1ad76d567c6cd2477fadfc7dbbac80f1ab5e
parent 4c1a63d2062b63bf279ac2c2e6010fb63816145a
Author: Ryan Jeffrey <ryan@ryanmj.xyz>
Date: Mon, 14 Feb 2022 19:03:23 -0800
Add more stickies, fix dynamic post reading
Diffstat:
2 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/src/main/rmjxyz/app.cljs b/src/main/rmjxyz/app.cljs
@@ -157,7 +157,7 @@
[file-list collection-path update-func]
(reset! file-list
(let [time-ms (.getTime (get @file-list :when))]
- (if (and (>= (- time-ms (.getTime js/Date.)) item-update-time)
+ (if (and (>= (- time-ms (.getTime (js/Date.))) item-update-time)
(> (get-mtime collection-path) time-ms))
;; Update the entire list, new post added, post removed, name change, etc..
(update-func collection-path)
@@ -187,13 +187,13 @@
;; Server paths.
(.get server "/posts/:post" (fn [^js req res next]
(let [post (.toLowerCase (.-post (.-params req)))]
- (update-files! post-items "./views/partials/content/posts" update-post-items)
(if (some #(= post (get % :basename)) (get @post-items :content))
(serve-200 "index" res (index-information
(create-windows [[(create-command (.join path "content/posts" post) true)]])))
(serve-404 post res)))))
(.get server "/posts" (fn [^js req res next]
+ (update-files! post-items "./views/partials/content/posts" update-post-items)
(serve-200 "index" res (index-information @post-windows))))
(.get server "/:item" (fn [^js req res next]
(let [item (.toLowerCase (.-item (.-params req)))]
diff --git a/views/layouts/main.handlebars b/views/layouts/main.handlebars
@@ -66,6 +66,12 @@
<a href="https://jigsaw.w3.org/css-validator/check/referer">
<img src="/res/stickies/vcss.gif" alt="Valid CSS!">
</a>
+
+ <a href="https://www.gimp.org/">
+ <img src="/res/stickies/gimp.webp" alt="Valid CSS!">
+ </a>
+
+ <img src="/res/stickies/chrmevil.webp" alt="Valid CSS!">
</div>
</body>