Improve assets

This commit is contained in:
Akira Tempaku 2025-05-24 12:01:37 +09:00
parent f69067f7ae
commit e831775c64
Signed by: paku
GPG key ID: 5B4E8402BCC50607
19 changed files with 1122 additions and 14 deletions

View file

Before

(image error) Size: 65 KiB

After

(image error) Size: 65 KiB

Before After
Before After

View file

Before

(image error) Size: 21 KiB

After

(image error) Size: 21 KiB

Before After
Before After

View file

Before

Width: 48px  |  Height: 48px  |  Size: 15 KiB

After

Width: 48px  |  Height: 48px  |  Size: 15 KiB

Before After
Before After

View file

Before

(image error) Size: 147 KiB

After

(image error) Size: 147 KiB

Before After
Before After

View file

Before

(image error) Size: 722 B

After

(image error) Size: 722 B

Before After
Before After

View file

Before

(image error) Size: 642 B

After

(image error) Size: 642 B

Before After
Before After

View file

Before

(image error) Size: 695 B

After

(image error) Size: 695 B

Before After
Before After

View file

Before

(image error) Size: 640 B

After

(image error) Size: 640 B

Before After
Before After

View file

Before

(image error) Size: 800 B

After

(image error) Size: 800 B

Before After
Before After

View file

Before

(image error) Size: 263 KiB

After

(image error) Size: 263 KiB

Before After
Before After

View file

Before

(image error) Size: 73 KiB

After

(image error) Size: 73 KiB

Before After
Before After

View file

Before

(image error) Size: 367 KiB

After

(image error) Size: 367 KiB

Before After
Before After

1109
assets/style/dist.css Normal file

File diff suppressed because it is too large Load diff

View file

@ -21,8 +21,7 @@
app
:debug (string= (website-env) "dev"))))
(install-middleware app *trim-trailing-slash*)
(static-path app "/img/" "static/img/")
(static-path app "/style/" "static/style/")
(static-path app "/assets/" "assets/")
(configure app)))
*app*

View file

@ -25,7 +25,7 @@
:description "The personal website of Akira Tempaku (paku)"
:canonical nil
:type "website"
:image (list :url (path->url "/img/og.jpg")
:image (list :url (path->url "/assets/img/og.jpg")
:height 1024
:width 1024)
:error nil))
@ -56,9 +56,9 @@
(meta :property "og:image:width" :content (getf image :width))
(meta :property "og:image:height" :content (getf image :height))
(link :rel "canonical" :href (path->url (or canonical path))))))
(link :rel "icon" :type "image/png" :href "/img/favicon-96x96.png" :sizes "96x96")
(link :rel "icon" :type "image/svg+xml" :href "/img/favicon.svg")
(link :rel "shortcut icon" :href "/img/favicon.ico")
(link :rel "apple-touch-icon" :sizes "180x180" :href "/img/apple-touch-icon.png")
(link :rel "icon" :type "image/png" :href "/assets/img/favicon-96x96.png" :sizes "96x96")
(link :rel "icon" :type "image/svg+xml" :href "/assets/img/favicon.svg")
(link :rel "shortcut icon" :href "/assets/img/favicon.ico")
(link :rel "apple-touch-icon" :sizes "180x180" :href "/assets/img/apple-touch-icon.png")
(meta :name "apple-mobile-web-app-title" :content "skyizwhite")
(link :rel "manifest" :href "/img/site.webmanifest"))))))
(link :rel "manifest" :href "/assets/img/site.webmanifest"))))))

View file

@ -13,7 +13,7 @@
(defcomp ~scripts ()
(hsx
(<>
(link :rel "stylesheet" :href (bust-cache "/style/dist.css"))
(link :rel "stylesheet" :href (bust-cache "/assets/style/dist.css"))
(link :rel "preconnect" :href "https://fonts.gstatic.com" :crossorigin t)
(link :rel "preconnect" :href "https://fonts.googleapis.com")
(link

View file

@ -11,19 +11,19 @@
(defparameter *links*
'(("Keyoxide"
"https://keyoxide.org/f39d5b2c951d16732a5cd3528f0c1a22f26d7e62"
"/img/icon/key.svg")
"/assets/img/icon/key.svg")
("GitHub"
"https://github.com/skyizwhite"
"/img/icon/github.svg")
"/assets/img/icon/github.svg")
("Forgejo"
"https://code.skyizwhite.dev/paku"
"/img/icon/forgejo.svg")
"/assets/img/icon/forgejo.svg")
("Fediverse"
"https://himagine.club/@skyizwhite"
"/img/icon/discussion.svg")
"/assets/img/icon/discussion.svg")
("Status"
"https://status.skyizwhite.dev"
"/img/icon/server.svg")))
"/assets/img/icon/server.svg")))
(defun handle-get (params)
(declare (ignore params))