commit 87105f166d4bd0ffffb9f2ca24dbce2bff1f9911
parent 5700bc59045a8d640f5058bd49d4fa3eb2e434f9
Author: Daniel Barlow <dan@telent.net>
Date: Tue, 22 Jul 2025 21:26:28 +0100
recognise y/m/slug urls
Diffstat:
1 file changed, 3 insertions(+), 0 deletions(-)
diff --git a/main.fnl b/main.fnl
@@ -30,6 +30,9 @@
:pathname path
}))
+ #(case (string.match $2 "/(%d+)/(%d+)/([%w_]+)" 1)
+ (year month slug) { :command :show :format :html : slug })
+
#(case (string.match $2 "/(%d+)/(%d+)/" 1)
(year month)
(let [after (os.time {: year : month :day -2 })