nat/htmlgen
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update home; fix timezone issue?

Browse Source
This commit is contained in:
gnat 2024-09-05 05:14:40 -07:00
parent 400cb86aee
commit 550c318db6
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/home.lisp
View File

@ -7,7 +7,10 @@
(br)
"I am not sure what I am going to use this site for, it only exists because I was <del>procrastinating my calculus homework</del> bored one day"
(br)
"website homepage visit-counter: $[echo visit >> files/home_visit_counter; cat files/home_visit_counter | wc -l]"))
"website homepage visit-counter: $[echo visit >> files/home_visit_counter; cat files/home_visit_counter | wc -l]"
(br)
(br)
"if you are here, I am rather curious as to why. I encourage you to use the post arbitrary data section of this page to tell me how you found my site."))
(section ()
(h2 () "particularly notable pages")
(a (:href "/html/site-info.html") "information about this website")

2
src/html/natalie-info.lisp
View File

@ -6,7 +6,7 @@
"despite this, I shall attempt a suitable description of myself.")
(br)
"ideally, I am to be referred to as an \"it\" or a \"she\". the former is preferred to some degree. I suppose I may reasonably be described as asexual. " (br)
"timezone I am in: " ,(exec-command "date '+%Z (UTC%z)'") (br)
"timezone I am in: " ,(exec-command "TZ=\"America/Los_Angeles\" date '+%Z (UTC%z)'") (br)
"age: $[echo $(( $(date +%s) - $(date -d \"2007-04-01\" +%s) ))] seconds. that is $[echo \"scale=8; ($(date +%s) - $(date -d '2007-04-01' +%s)) / (365.25*24*3600)\" | bc] [earth] years." (br)
"I am kind of a college student. it is complicated. I will be a college student with less complicated circumstances by fall of 2025, barring unforseen circumstances." (br)
"I like systems. particularly ones that have reasonably consistent behavior based on a set of rules. this is omnipresent in my interests." (br)