From 17a76711d1f9bdaad133c9364a9bfd2ef10b8f22 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 9 Oct 2023 20:28:31 +0100
Subject: ccwl: Allow literals as arguments.

* ccwl/ccwl.scm (<input>)[set-input-default]: New setter.
* ccwl/ccwl.scm (<command>)[set-command-inputs]: Add setter.
* ccwl/ccwl.scm (apply-partially): New function.
(collect-steps): Support literal strings as arguments.
* tests/ccwl.scm ("allow literal strings as arguments"): New test.
* .dir-locals.el (scheme-mode): Indent set-command-inputs and
set-input-default.
---
 .dir-locals.el | 2 ++
 1 file changed, 2 insertions(+)

(limited to '.dir-locals.el')

diff --git a/.dir-locals.el b/.dir-locals.el
index 6b65dec..ce473a1 100644
--- a/.dir-locals.el
+++ b/.dir-locals.el
@@ -7,5 +7,7 @@
   (indent-tabs-mode t))
  (scheme-mode
   (eval put 'lambda** 'scheme-indent-function 1)
+  (eval put 'set-command-inputs 'scheme-indent-function 1)
+  (eval put 'set-input-default 'scheme-indent-function 1)
   (eval put 'syntax-lambda** 'scheme-indent-function 1)
   (eval put 'workflow 'scheme-indent-function 1)))
-- 
cgit v1.2.3