From 5616781558901cde264f3a29bb5de816f26a2454 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 29 Nov 2025 03:29:43 +0000
Subject: work/command-line-tool: Do not add defaults.

Defaults have already been added by the scheduler.
---
 ravanan/work/command-line-tool.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/ravanan/work/command-line-tool.scm b/ravanan/work/command-line-tool.scm
index 0d9bcea..e82a42e 100644
--- a/ravanan/work/command-line-tool.scm
+++ b/ravanan/work/command-line-tool.scm
@@ -434,9 +434,11 @@ be defined in the context in which the G-expressions are inserted."
                     (and (assoc "inputBinding" formal-input)
                          (let ((id (assoc-ref formal-input "id")))
                            (list (list id)
-                                 (or (assoc-ref inputs id)
-                                     (assoc-ref formal-input "default")
-                                     'null)
+                                 ;; The inputs alist has been fully resolved
+                                 ;; with default and null values. It is
+                                 ;; guaranteed to have a mapping for every input
+                                 ;; id.
+                                 (assoc-ref inputs id)
                                  (or (assoc-ref formal-input "type")
                                      (user-error "Type of input ~a not specified"
                                                  id))
-- 
cgit 1.4.1