|
|
@ -41,6 +41,7 @@ |
|
|
|
"<hr/>\n" |
|
|
|
"<footer>This website was built with [wg](https://git.m455.casa/m455/wg)</footer>\n")) |
|
|
|
|
|
|
|
;; Unused |
|
|
|
(fn map [func seq] |
|
|
|
(let [seq []] |
|
|
|
(each [index val (pairs seq)] |
|
|
@ -100,6 +101,14 @@ |
|
|
|
(with-open [file-out (io.open file :w)] |
|
|
|
(file-out:write data))) |
|
|
|
|
|
|
|
;; Unused |
|
|
|
(fn file->lines [file] |
|
|
|
(with-open [file-in (io.open file :r)] |
|
|
|
(let [seq []] |
|
|
|
(each [line (file-in:lines)] |
|
|
|
(table.insert seq line)) |
|
|
|
seq))) |
|
|
|
|
|
|
|
(fn files-missing [] |
|
|
|
(let [seq []] |
|
|
|
(each [_ file (pairs files-required)] |
|
|
|