From 359786224151203405a34cbb83ab4a3b2c765d91 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Wed, 11 Sep 2024 18:21:24 +0100
Subject: command-line-tool: Write, not read from, literal staged file.

* ravanan/command-line-tool.scm (build-command-line-tool-script):
Replace call-with-output-file with call-with-input-file.
---
 ravanan/command-line-tool.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ravanan/command-line-tool.scm b/ravanan/command-line-tool.scm
index d55eb7d..0edbcb0 100644
--- a/ravanan/command-line-tool.scm
+++ b/ravanan/command-line-tool.scm
@@ -899,7 +899,7 @@ named @var{name} with @var{inputs} using tools from Guix manifest
                              ;; others.
                              (map (match-lambda
                                     ((entry-name entry)
-                                     (call-with-input-file entry-name
+                                     (call-with-output-file entry-name
                                        (cut put-string <> entry))))
                                   (list #$@(from-maybe
                                             (maybe-bind
-- 
cgit v1.2.3