diff options
Diffstat (limited to 'fi')
| -rw-r--r-- | fi/blog/index.org | 21 | ||||
| -rw-r--r-- | fi/blog/sivujen-uudistus.org | 4 |
2 files changed, 16 insertions, 9 deletions
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 + + <<code:index-utils>> (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 |