mpuppe/secrets
1
0
Fork 0
mirror of https://codeberg.org/puppe/secrets.git synced 2025-12-20 00:42:17 +01:00
Code Issues Projects Releases Packages Wiki Activity

Take path to config file as command-line argument

Browse source
This commit is contained in:
Martin Puppe 2020-11-25 14:33:00 +01:00
parent 2ea10580b9
commit 88b66fe6bc
1 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
secrets
View file

@ -223,7 +223,11 @@ EOF
(void)) (void))
(let* ([config-file "test/config.json"] (define cfg-file (make-parameter #f))
[config (call-with-input-file config-file read-json)]) (command-line
(deploy-secrets config (path->complete-path (path-only config-file))) #:args ([config-file "secrets.json"])
(cfg-file config-file))
(let* ([config (call-with-input-file (cfg-file) read-json)])
(deploy-secrets config (path->complete-path (path-only (cfg-file))))
(displayln "Done.")) (displayln "Done."))