liminix

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

commit e039783e67d2773b73963a7a30b338ac5b9f8130
parent dc4b7ebffdfca0ae1b1ba4b446ced53993ae28eb
Author: Daniel Barlow <dan@telent.net>
Date:   Sat, 12 Aug 2023 18:16:06 +0100

exclude outputs from doc

Diffstat:
Mdoc/parse-options.fnl | 11+++++++++--
1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/doc/parse-options.fnl b/doc/parse-options.fnl @@ -67,9 +67,16 @@ (each [_ param (ipairs o.parameters)] (print-option param 4))) +(fn output? [option] + (match option.loc + ["system" "outputs" & _] true + _ false)) + (fn sort-options [module] - (table.sort module (fn [a b] (< a.name b.name))) - module) + (let [options (icollect [_ o (ipairs module)] + (if (not (output? o)) + o))] + (doto options (table.sort (fn [a b] (< a.name b.name)))))) (let [raw (yaml.load (io.read "*a")) modules {}]