This commit is contained in:
Akira Tempaku 2025-03-28 23:12:07 +09:00
commit c8ab7e1349
Signed by: paku
GPG key ID: 5B4E8402BCC50607
19 changed files with 123 additions and 95 deletions
src/components

View file

@ -1,27 +0,0 @@
(defpackage #:hp/components/header
(:use #:cl
#:hsx)
(:export #:~header))
(in-package #:hp/components/header)
(defcomp ~header ()
(let ((links '(("Home" "/")
("About" "/about")
("Work" "/work")
("Article" "/article")
("Contact" "/contact"))))
(hsx
(header :class "fixed top-0 w-full"
(div :class "container flex justify-between py-6"
(h1
(a :href "/"
(img
:src "/logo.png" :alt "Amongtellers"
:class "w-52 h-auto")))
(ul :class "flex flex-col gap-4"
(loop
:for (title href) :in links :collect
(hsx
(li :class "flex items-center"
(a :href href :class "text-lg hover:text-orange-600"
title))))))))))