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 a6f7de1 commit d13895c
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions hugo.scm
Original file line number Diff line number Diff line change
Expand Up @@ -25,7 +25,7 @@
(let ((dishes (read-dishes))
(words (read-words))
(phrases (read-phrases))
(places (read-places)))
(places (read-places)))
(if i (copy-images))
(if v (print dishes))
(if o (write-dishes dishes))))))
Expand Down Expand Up @@ -258,6 +258,6 @@

(define (read-phrases)
(let ((files (read-json "assets/json/phrases.json")))
(concatenate (map (lambda (file)
(concatenate (map (lambda (file)
(read-json #"assets/json/phrases/~|file|.json"))
files))))

0 comments on commit d13895c

Please sign in to comment.