From 4e769339ca96060f8e32e008ce6b2e7aa25caf11 Mon Sep 17 00:00:00 2001
From: Akira Tempaku <paku@skyizwhite.dev>
Date: Sun, 4 May 2025 01:35:09 +0900
Subject: [PATCH] Enable preload

---
 src/components/header.lisp | 4 ++--
 src/renderer.lisp          | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/components/header.lisp b/src/components/header.lisp
index b8610bc..43c03fc 100644
--- a/src/components/header.lisp
+++ b/src/components/header.lisp
@@ -14,7 +14,7 @@
   (hsx
    (header :class "hidden md:flex justify-between py-4 border-b-1 top-0 bg-white"
      (h1 :class "z-20 text-3xl font-bold"
-       (a :href "/" "skyizwhite"))
+       (a :preload "mouseover" :href "/" "skyizwhite"))
      (nav :class "flex items-end"
        (ul :preload "mouseover" :class "flex gap-4 text-xl font-medium"
          (loop
@@ -29,7 +29,7 @@
      :id "sp-header" :x-data "{ open: false }"
      :class "flex md:hidden justify-between py-2 border-b-1 top-0 bg-white"     
      (h1 :class "z-20 text-2xl font-bold"
-       (a :href "/" "skyizwhite"))
+       (a :preload "mousedown" :href "/" "skyizwhite"))
      (div
        (button
          :class "z-20 size-8 flex flex-col justify-center cursor-pointer relative"
diff --git a/src/renderer.lisp b/src/renderer.lisp
index 8b0ba29..422436c 100644
--- a/src/renderer.lisp
+++ b/src/renderer.lisp
@@ -27,6 +27,6 @@
                               (~metadata :metadata (context :metadata))
                               (~scripts))
                             (body
-                              :hx-ext "head-support, response-targets"
+                              :hx-ext "head-support, response-targets, preload"
                               :hx-boost "true" :hx-target-404 "body" :hx-target-5* "body"
                               (~layout result)))))))