Migrate from Piccolo to HSX

This commit is contained in:
Akira Tempaku 2024-06-01 22:21:15 +09:00
parent ef57e83a8c
commit 19e467fe97
10 changed files with 163 additions and 157 deletions
src/routes

View file

@ -1,7 +1,8 @@
(defpackage #:hp/routes/not-found
(:use #:cl
#:piccolo)
(:local-nicknames (#:view #:hp/view/*))
#:hsx)
(:import-from #:hp/view/responser
#:response)
(:export #:handle-not-found))
(in-package #:hp/routes/not-found)
@ -9,13 +10,14 @@
'(:title "404 Not Found"
:description "お探しのページは見つかりませんでした。"))
(define-element page ()
(div :class "h-full place-content-center"
(h1
:class "text-rose-400 text-4xl text-center"
"404 Not Found")))
(defcomp page ()
(hsx
(div :class "h-full place-content-center"
(h1
:class "text-rose-400 text-4xl text-center"
"404 Not Found"))))
(defun handle-not-found ()
(view:render (page)
:status :not-found
:metadata *metadata*))
(response (page)
:status :not-found
:metadata *metadata*))