paku/website
1
0
Fork 0
Code Issues4 Pull requests Projects Releases Packages Wiki Activity Actions

Improve email viewer

Browse source
This commit is contained in:
Akira Tempaku 2024-04-27 04:17:21 +09:00
commit ef57e83a8c
1 changed files with 7 additions and 7 deletions

14
src/routes/index.lisp
View file

@ -21,9 +21,9 @@
:class "w-full max-w-xs rounded-xl shadow-sm")) :class "w-full max-w-xs rounded-xl shadow-sm"))
(div :class "flex flex-col justify-center gap-10" (div :class "flex flex-col justify-center gap-10"
(h1 :class "text-4xl font-bold" (h1 :class "text-4xl font-bold"
"paku (skyizwhite)") "paku")
(p :class "text-xl" (p :class "text-xl"
"Software developer") "Web developer")
(ul (ul
(li (li
(span "GitHub:") (span "GitHub:")
@ -36,12 +36,12 @@
(span "Email: ") (span "Email: ")
(a (a
:x-data (ps (create6 :x-data (ps (create6
(email (list6 "paku" "@" "skyizwhite.dev")) (email (chain (list6 "paku" "skyizwhite.dev")
(mailto (list6 "mailto:")))) (join "@")))))
:x-text (ps (chain email (join ""))) :x-text (ps email)
:|:href| (ps (chain (list6 :... mailto :... email) (join ""))) :|:href| (ps (chain (list6 "mailto:" email) (join "")))
:|:class| "'text-indigo-500'" :|:class| "'text-indigo-500'"
"Please enable Javascript to read.")) "(Please enable Javascript to show.)"))
(li (li
(span "Fediverse(main): ") (span "Fediverse(main): ")
(a (a