Skip to content
This repository has been archived by the owner on Jul 10, 2024. It is now read-only.

Commit

Permalink
Update hugo.scm
Browse files Browse the repository at this point in the history
  • Loading branch information
technicat committed Aug 8, 2023
1 parent 25bc90c commit 38bdfa8
Showing 1 changed file with 4 additions and 3 deletions.
7 changes: 4 additions & 3 deletions hugo.scm
Original file line number Diff line number Diff line change
Expand Up @@ -156,9 +156,10 @@
(h4 "Wiktionary" out)
(let ((wkty (wkty chinese)))
(if wkty
(for-each (lambda (chars)
(bullet (linkstr chars #"https://en.wiktionary.org/wiki/~chars" )out))
wkty)
(let ((links (map (lambda (chars)
(linkstr chars #"https://en.wiktionary.org/wiki/~chars"))
wkty)))
(write-string (comma-list links) out))
(write-string "Missing wiktionary" out))
(news out)))

Expand Down

0 comments on commit 38bdfa8

Please sign in to comment.