Use comment by email, relative links, cleaner footer

This commit is contained in:
Yann Esposito (Yogsototh) 2020-05-02 12:03:04 +02:00
parent 25010b68c1
commit 0f054b8b8a
Signed by untrusted user who does not match committer: yogsototh
GPG key ID: 7B19A4C650D59646
3 changed files with 9 additions and 8 deletions

View file

@ -65,11 +65,15 @@
"</svg>" "</svg>"
"</div>")) "</div>"))
(defun relative-link (output-file)
"Given an output-file generate a link relative to the URL origin."
(replace-regexp-in-string ".*/_site" "" output-file))
(defun gen-permalink (output-file) (defun gen-permalink (output-file)
"Given the output-file generate a permalink" "Given the output-file generate a permalink"
(format "%s%s" (format "%s%s"
websiteorigin websiteorigin
(replace-regexp-in-string ".*/_site" "" output-file))) (relative-link output-file)))
(defun gen-org-src (permalink) (defun gen-org-src (permalink)
"Given a permalink generate the path to the asssociated .org source file" "Given a permalink generate the path to the asssociated .org source file"
@ -174,9 +178,10 @@
emacs-version spacemacs-version org-version)) emacs-version spacemacs-version org-version))
(website-code (website-code
"<a href=\"https://gitea.esy.fun/yogsototh/her.esy.fun\" target=\"_blank\" rel=\"noopener noreferrer\">Website source code</a>") "<a href=\"https://gitea.esy.fun/yogsototh/her.esy.fun\" target=\"_blank\" rel=\"noopener noreferrer\">Website source code</a>")
(org-src (gen-org-src (gen-permalink (plist-get info :output-file)))) (org-src (gen-org-src (relative-link (plist-get info :output-file))))
(org-src-link (format "<a href=\"%s\">%s</a>" org-src org-src))) (org-src-link (format "<a href=\"%s\">%s</a>" org-src org-src)))
(concat (concat
"<i>Any comment? Click on my email below and I'll add it.</i>"
"<table>" "<table>"
(mapconcat (lambda (entry) (mapconcat (lambda (entry)
(when (cdr entry) (when (cdr entry)
@ -189,7 +194,7 @@
("size" . ,size) ("size" . ,size)
("gen-date" . ,generated-date) ("gen-date" . ,generated-date)
("get-with" . ,generated-with) ("get-with" . ,generated-with)
("website-src" . ,website-code) ("src" . ,website-code)
("org-file" . ,org-src-link)) ("org-file" . ,org-src-link))
" ") " ")
"</table>")) "</table>"))

Binary file not shown.

View file

@ -12,10 +12,6 @@ body {
line-height: var(--lh); line-height: var(--lh);
min-height: 100vh; min-height: 100vh;
} }
footer {
font-size: 14px;
font-family: monospace;
}
code { code {
font-size: 15px; font-size: 15px;
} }
@ -279,7 +275,7 @@ h1:before, h2:before, h3:before, h4:before, h5:before, h6:before {
nav a, nav a:visited { nav a, nav a:visited {
color: var(--fg); color: var(--fg);
} }
a:hover, .metas a:hover, nav a:hover a:hover, .metas a:hover, nav a:hover, a:hover *
{ {
color: #fff; color: #fff;
background: var(--hl); background: var(--hl);