Refactor
This commit is contained in:
parent
67af8aad50
commit
c8ab7e1349
19 changed files with 123 additions and 95 deletions
src/components
|
@ -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))))))))))
|
Loading…
Add table
Add a link
Reference in a new issue