From def68d973bc978cab37338f8a8b6ce16388cbde4 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 15 May 2021 20:21:26 +0530
Subject: Make stdin a unary key of command.

* ccwl/ccwl.scm (command): Make stdin a unary key.
---
 ccwl/ccwl.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ccwl')

diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 3869bb1..7b8d59c 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -129,7 +129,7 @@
   (field-appender command-outputs set-command-outputs))
 
 (define command
-  (lambda** (#:key* run (additional-inputs '()) (outputs '()) stdin (other '()))
+  (lambda** (#:key stdin #:key* run (additional-inputs '()) (outputs '()) (other '()))
     (make-command additional-inputs outputs run stdin other)))
 
 (define (input=? input1 input2)
-- 
cgit v1.2.3