mirror of github:amycatgirl/amycatgirl.github.io
wip: lay out skeleton for fallback script
Signed-off-by: Amy <amy+git@amogus.cloud>
+19
+19
fallback.lisp
+19
fallback.lisp
···
1
+
;; amycatgirl.github.io no-js fallback
2
+
;; Last authored: Thu 19 Mar 18:41:03 AST 2026
3
+
4
+
(defconstant +user_did+ "")
5
+
(defconstant +max-entries+ 5)
6
+
7
+
;; Git
8
+
(defun git-add (files))
9
+
(defun git-commit (message))
10
+
11
+
;; ATProto
12
+
(defun resolve-pds (did))
13
+
(defun fetch-entries (did pds max))
14
+
(defun build-elements-from-entries (entries))
15
+
16
+
;; Generator
17
+
(defun sort-entries-by-date (entries))
18
+
(defun generate-html ())
19
+
(defun publish ())