summary refs log tree commit diff
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rwxr-xr-xbin/ravanan14
1 files changed, 9 insertions, 5 deletions
diff --git a/bin/ravanan b/bin/ravanan
index cc9005d..5807a8e 100755
--- a/bin/ravanan
+++ b/bin/ravanan
@@ -27,6 +27,7 @@ exec guile --no-auto-compile -e main -s "$0" "$@"
              (ice-9 match)
              (web uri)
              (json)
+             (ravanan batch-system)
              (ravanan reader)
              (ravanan utils)
              (ravanan workflow))
@@ -145,11 +146,14 @@ files that have the token in the @verbatim{SLURM_JWT=token} format."
                                    (if (file-name-absolute? (assq-ref args 'store))
                                        (assq-ref args 'store)
                                        (canonicalize-path (assq-ref args 'store)))
-                                   (assq-ref args 'batch-system)
-                                   #:guix-daemon-socket (assq-ref args 'guix-daemon-socket)
-                                   #:slurm-api-endpoint (assq-ref args 'slurm-api-endpoint)
-                                   #:slurm-jwt (and (assq-ref args 'slurm-jwt)
-                                                    (read-jwt (assq-ref args 'slurm-jwt))))
+                                   (case (assq-ref args 'batch-system)
+                                     ((single-machine) 'single-machine)
+                                     ((slurm-api)
+                                      (slurm-api-batch-system
+                                       (assq-ref args 'slurm-api-endpoint)
+                                       (and (assq-ref args 'slurm-jwt)
+                                            (read-jwt (assq-ref args 'slurm-jwt))))))
+                                   #:guix-daemon-socket (assq-ref args 'guix-daemon-socket))
                      (current-output-port)
                      #:pretty #t)
           (newline (current-output-port))))))))