From a2815554cb025d19f5bd851208cc636028f2f33d Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sun, 25 Apr 2021 22:58:17 +0530
Subject: Redefine command using lambda**.

* ccwl/ccwl.scm (command): Redefine using lambda**.
---
 ccwl/ccwl.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 547cf23..07c0976 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -128,8 +128,9 @@
 (define append-command-outputs
   (field-appender command-outputs set-command-outputs))
 
-(define* (command #:key run (additional-inputs '()) (outputs '()) stdin (other '()))
-  (make-command additional-inputs outputs run stdin other))
+(define command
+  (lambda** (#:key* run (additional-inputs '()) (outputs '()) stdin (other '()))
+    (make-command additional-inputs outputs run stdin other)))
 
 (define (input=? input1 input2)
   (string=? (input-id input1)
-- 
cgit v1.2.3