From bea4cf1ae71bb20f436d16041d642dc56faea734 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Thu, 5 Sep 2024 17:03:53 +0100
Subject: command-line-tool: Require glob only for File and Directory types.

*
ravanan/command-line-tool.scm (build-command-line-tool-script)[output-binding-glob]:
Require glob only for File and Directory types.
---
 ravanan/command-line-tool.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ravanan/command-line-tool.scm b/ravanan/command-line-tool.scm
index 47b3903..30ff451 100644
--- a/ravanan/command-line-tool.scm
+++ b/ravanan/command-line-tool.scm
@@ -703,7 +703,9 @@ named @var{name} with @var{inputs} using tools from Guix manifest
     (from-maybe
      (maybe-assoc-ref (just output)
                       "outputBinding" "glob")
-     (raise-error #f "glob output binding not specified")))
+     (and (memq (formal-parameter-type (assoc-ref* output "type"))
+                (list 'File 'Directory))
+          (raise-error #f "glob output binding not specified"))))
 
   (define run-command-gexp
     #~(run-command (list #$@(append-map (lambda (arg)
-- 
cgit v1.2.3