diff options
| author | Arun Isaac | 2024-10-28 20:22:44 +0000 |
|---|---|---|
| committer | Arun Isaac | 2024-11-06 00:37:10 +0000 |
| commit | e44044582536f67fe15dfc20a7b8129ebd16424c (patch) | |
| tree | 9ed2b5f3d1c4d6b5370d5875e0d4af949bb4226a | |
| parent | 1b30524590cb39e619fc803f30c2633b2b810f50 (diff) | |
| download | ravanan-e44044582536f67fe15dfc20a7b8129ebd16424c.tar.gz ravanan-e44044582536f67fe15dfc20a7b8129ebd16424c.tar.lz ravanan-e44044582536f67fe15dfc20a7b8129ebd16424c.zip | |
bin: Add --guix-channels command-line argument.
* bin/ravanan: Import (guix channels).
(%options): Add guix-channels.
(print-usage): Document it.
(main): Load channels from channels file if specified.
| -rwxr-xr-x | bin/ravanan | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/bin/ravanan b/bin/ravanan index f5a991b..b6ae84d 100755 --- a/bin/ravanan +++ b/bin/ravanan @@ -39,6 +39,9 @@ exec guile --no-auto-compile -e main -s "$0" "$@" (acons 'batch-system (string->symbol arg) result) (error "Unknown batch system" arg)))) + (option (list "guix-channels") #t #f + (lambda (opt name arg result) + (acons 'guix-channels-file arg result))) (option (list "guix-daemon-socket") #t #f (lambda (opt name arg result) (acons 'guix-daemon-socket arg result))) @@ -85,6 +88,7 @@ Run CWL-WORKFLOW with INPUTS. Guix options: + --guix-channels=GUIX_CHANNELS guix channels file to build profiles on --guix-daemon-socket=GUIX_DAEMON_SOCKET guix daemon to connect to --guix-manifest=GUIX_MANIFEST guix manifest to run jobs with @@ -142,7 +146,12 @@ files that have the token in the @verbatim{SLURM_JWT=token} format." (scm->json (run-workflow (file-name-stem workflow-file) (canonicalize-path (assq-ref args 'guix-manifest-file)) - #f + (and (assq-ref args 'guix-channels-file) + (load-script + (canonicalize-path + (assq-ref args 'guix-channels-file)) + #:modules '((guile) + (guix channels)))) (read-workflow workflow-file) (read-inputs inputs-file) (case (assq-ref args 'batch-system) |