From 053e6d0a317e00d77d44bac1e0cf4181e4cbe89c Mon Sep 17 00:00:00 2001 From: Joel Kronqvist Date: Sun, 14 Jun 2026 16:09:01 +0300 Subject: sorted the indexes & added one to the english side --- en/index.org | 51 ++++++++++++++++++++++++++++++--- en/pgp.org | 1 + fi/blog/index.org | 21 +++++++++----- fi/blog/sivujen-uudistus.org | 4 +-- generated/en/index.html | 27 +++++++++++++---- generated/en/pgp.html | 9 ++++-- generated/fi/blog/index.html | 2 +- generated/fi/blog/sivujen-uudistus.html | 6 ++-- generated/fi/index.html | 2 +- generated/fi/pgp.html | 4 +-- 10 files changed, 99 insertions(+), 28 deletions(-) diff --git a/en/index.org b/en/index.org index 9480e6f..1249e5e 100644 --- a/en/index.org +++ b/en/index.org @@ -2,11 +2,54 @@ Welcome to my website! -I don't publish as much content in English on the web, except much of -my programming related content. I've also got a gemini capsule for you -all in English at gemini://cron4.fi. My contact information can be -found there if you need it. +I don't publish as much content in English on the web as in Finnish. +I've got a gemini capsule for you all in English at +gemini://cron4.fi. My contact information can be found there if you +need it. Also, in case you want to send me encrypted messages or verify that I have indeed signed a file, you can find my public key & its fingerprint [[./pgp.org][here]]. + +Here is still an explicit index of the English side of my website. + +#+begin_src emacs-lisp :exports results :noweb yes + + <> + + (defun generate-entry + (name) + "Generates an index entry for file NAME." + (let ((extension (file-name-extension name)) (bname (file-name-sans-extension name))) + (concat "[[./" + name + "][" + (or + (if (string= extension "org") + (get-org-file-title (concat "./" name)) + nil) + bname) + "]] " + (or (if (string= extension "org") + (get-org-file-property (concat "./" name) "SUBTITLE") + nil) + "No subtitle available")))) + + (let ((files + (seq-filter (lambda (name) + (not (or + (string-suffix-p "~" name) + (string-suffix-p "#" name) + (string-prefix-p "#" name) + (string-prefix-p "." name) + (string= "index.org" name)))) + (sort (directory-files "./") + :key (lambda (f) (get-file-date f)) + :reverse t)))) + (seq-map (lambda (name) `(,(generate-entry name))) files)) +#+end_src + +#+RESULTS: +| [[./pgp.org][Public key]] Send encrypted data to me or verify my signature | + + diff --git a/en/pgp.org b/en/pgp.org index b1f8695..14a7065 100644 --- a/en/pgp.org +++ b/en/pgp.org @@ -1,4 +1,5 @@ #+TITLE: Public key +#+SUBTITLE: Send encrypted data to me or verify my signature The fingerprint for my public PGP key is ~24F59B15EB13A69D492C300601B3DAEDABD96CE1~. I made a new one because I diff --git a/fi/blog/index.org b/fi/blog/index.org index 62167c8..740897b 100644 --- a/fi/blog/index.org +++ b/fi/blog/index.org @@ -1,7 +1,7 @@ #+TITLE: Blogin sisällys -#+begin_src emacs-lisp :exports results - +#+name: code:index-utils +#+begin_src emacs-lisp :exports none (defun get-org-file-property (path property) "Gets PROPERTY of org file at PATH. Returns nil if not found." (with-temp-buffer (setq case-fold-search t) @@ -24,7 +24,12 @@ nil) (format-time-string "%Y-%m-%d" (file-attribute-modification-time - (file-attributes (concat "./" name)))))) + (file-attributes (concat "./" path)))))) +#+end_src + +#+begin_src emacs-lisp :exports results :noweb yes + + <> (defun generate-entry (name) @@ -54,12 +59,14 @@ (string-prefix-p "#" name) (string-prefix-p "." name) (string= "index.org" name)))) - (directory-files "./")))) + (sort (directory-files "./") + :key (lambda (f) (get-file-date f)) + :reverse t)))) (seq-map (lambda (name) `(,(generate-entry name))) files)) #+end_src #+RESULTS: -| [[./post.org][Test-post-title]] (2026-06-12) Test subtitle | -| [[./tekstinsyotto.html][tekstinsyotto]] (2025-07-28) Alaotsikkoa ei saatavilla | -| [[./yksinkertaisesti-monipuolinen.txt][yksinkertaisesti-monipuolinen]] (2024-05-06) Alaotsikkoa ei saatavilla | +| [[./sivujen-uudistus.org][Verkkosivujeni uudistus]] (2026-06-14) Mitä sivuilleni on tapahtunut ja miksi | +| [[./tekstinsyotto.html][tekstinsyotto]] (2025-07-28) Alaotsikkoa ei saatavilla | +| [[./yksinkertaisesti-monipuolinen.txt][yksinkertaisesti-monipuolinen]] (2024-05-06) Alaotsikkoa ei saatavilla | diff --git a/fi/blog/sivujen-uudistus.org b/fi/blog/sivujen-uudistus.org index a9e2eba..3a3449d 100644 --- a/fi/blog/sivujen-uudistus.org +++ b/fi/blog/sivujen-uudistus.org @@ -1,10 +1,10 @@ #+TITLE: Verkkosivujeni uudistus #+SUBTITLE: Mitä sivuilleni on tapahtunut ja miksi -* TODO Päivitä sivut loppuun [2/6] +* TODO Päivitä sivut loppuun [3/6] - [ ] Lisää git-tietosäilöt, erityisesti sivujen koodi - [ ] Selitä muutokset täällä ja englanninkielisellä puolella - [X] Luo englanninkielinen puoli - [X] Lisää julkinen avain & linkkaa ne (sekä fi+en) - [ ] Tyylittele linkkilistat -- [ ] Aseta blogin indeksi aikajärjestykseen +- [X] Aseta blogin indeksi aikajärjestykseen diff --git a/generated/en/index.html b/generated/en/index.html index 68421bd..cf0ca2a 100644 --- a/generated/en/index.html +++ b/generated/en/index.html @@ -3,7 +3,7 @@ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> - + Joel Kronqvist @@ -209,10 +209,10 @@ Welcome to my website!

-I don't publish as much content in English on the web, except much of -my programming related content. I've also got a gemini capsule for you -all in English at gemini://cron4.fi. My contact information can be -found there if you need it. +I don't publish as much content in English on the web as in Finnish. +I've got a gemini capsule for you all in English at +gemini://cron4.fi. My contact information can be found there if you +need it.

@@ -220,6 +220,23 @@ Also, in case you want to send me encrypted messages or verify that I have indeed signed a file, you can find my public key & its fingerprint here.

+ +

+Here is still an explicit index of the English side of my website. +

+ + + + +++ + + + + + +
Public key Send encrypted data to me or verify my signature
diff --git a/generated/en/pgp.html b/generated/en/pgp.html index e629f7d..e9a3588 100644 --- a/generated/en/pgp.html +++ b/generated/en/pgp.html @@ -3,7 +3,7 @@ "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> - + Public key @@ -203,7 +203,10 @@
-

Public key

+

Public key +
+Send encrypted data to me or verify my signature +

The fingerprint for my public PGP key is 24F59B15EB13A69D492C300601B3DAEDABD96CE1. I made a new one because I @@ -237,7 +240,7 @@ Below there is proof that my new key is legitimate assuming you already trusted my old key.

-
+
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA256
 
diff --git a/generated/fi/blog/index.html b/generated/fi/blog/index.html
index dca071d..4942414 100644
--- a/generated/fi/blog/index.html
+++ b/generated/fi/blog/index.html
@@ -3,7 +3,7 @@
 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 
 
-
+
 
 
 Blogin sisällys
diff --git a/generated/fi/blog/sivujen-uudistus.html b/generated/fi/blog/sivujen-uudistus.html
index f760855..dd63e62 100644
--- a/generated/fi/blog/sivujen-uudistus.html
+++ b/generated/fi/blog/sivujen-uudistus.html
@@ -3,7 +3,7 @@
 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 
 
-
+
 
 
 Verkkosivujeni uudistus
@@ -208,13 +208,13 @@
 Mitä sivuilleni on tapahtunut ja miksi
 
 

-
TODO Päivitä sivut loppuun [1/6]

+
TODO Päivitä sivut loppuun [2/6]

 

 
    
 
  • [ ] Lisää git-tietosäilöt, erityisesti sivujen koodi
    • 
 
  • [ ] Selitä muutokset täällä ja englanninkielisellä puolella
    • 
 
  • [X] Luo englanninkielinen puoli
    • 
-
  • [ ] Lisää julkinen avain & linkkaa ne (sekä fi+en)
    • 
+
  • [X] Lisää julkinen avain & linkkaa ne (sekä fi+en)
    • 
 
  • [ ] Tyylittele linkkilistat
    • 
 
  • [ ] Aseta blogin indeksi aikajärjestykseen
    • 
 

diff --git a/generated/fi/index.html b/generated/fi/index.html
index 142ca3a..a652457 100644
--- a/generated/fi/index.html
+++ b/generated/fi/index.html
@@ -3,7 +3,7 @@
 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 
 
-
+
 
 
 Joel Kronqvist
diff --git a/generated/fi/pgp.html b/generated/fi/pgp.html
index 53ae64b..cf20d58 100644
--- a/generated/fi/pgp.html
+++ b/generated/fi/pgp.html
@@ -3,7 +3,7 @@
 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
 
 
-
+
 
 
 Julkinen avaimeni
@@ -236,7 +236,7 @@ Lataa julkiset avaimeni seuraavista linkeistä:
 Alla on vielä todiste siitä, että uusi julkinen avaimeni on aito.
 

 
-
+
 -----BEGIN PGP SIGNED MESSAGE-----
 Hash: SHA256
 
-- 
cgit v1.2.3