Pretty print config in debug mode

This commit is contained in:
Cadence Ember 2022-08-30 22:13:26 +12:00
parent a5079b5a57
commit 2af32edd8c
Signed by: cadence
GPG key ID: BC1C2C61CF521B17

View file

@ -1,5 +1,6 @@
#lang racket/base #lang racket/base
(require racket/runtime-path (require racket/pretty
racket/runtime-path
ini) ini)
(provide (provide
@ -48,4 +49,6 @@
(printf "note: ~a items loaded from config file~n" (length l))))))) (printf "note: ~a items loaded from config file~n" (length l)))))))
(when (config-true? 'debug) (when (config-true? 'debug)
(printf "config: ~v~n" config)) (parameterize ([pretty-print-columns 80])
(display "config: ")
(pretty-write (hash->list config))))