fix: server 404

src/net/deertopia/doerg/server.clj

@@ -51,9 +51,12 @@
 (defn html-dir []
   (-> cfg/*cfg* ::cfg/state-directory (fs/file "html")))
 
-;; This could infinitely look if the 404 page can't be found. lmfao.
-(defn not-found [req]
-  (node-by-slug {:path-params {:slug not-found-slug}})
+(declare node-by-slug)
+
+;; This could infinitely loop if the 404 page can't be found. lmfao.
+(defn not-found [_req]
+  (-> (node-by-slug {:path-params {:slug not-found-slug}})
+      (assoc :status 404))
   #_(response/not-found "not found"))
 
 (defn org-file->html-file [org-file]