aboutsummaryrefslogtreecommitdiff
path: root/ccwl/ccwl.scm
diff options
context:
space:
mode:
authorArun Isaac2023-10-09 20:34:44 +0100
committerArun Isaac2023-10-09 22:00:00 +0100
commitd44f7188be84997f6660e6910bfadb5f7b1e9824 (patch)
tree8120b2388b67cefb724d0f642a44a665125d35df /ccwl/ccwl.scm
parent17a76711d1f9bdaad133c9364a9bfd2ef10b8f22 (diff)
downloadccwl-d44f7188be84997f6660e6910bfadb5f7b1e9824.tar.gz
ccwl-d44f7188be84997f6660e6910bfadb5f7b1e9824.tar.lz
ccwl-d44f7188be84997f6660e6910bfadb5f7b1e9824.zip
ccwl: Deprecate auto-connection of single input commands.
This seems like functionality that will be hard to support and will almost never be used in a real-world workflow. This feature is not even advertised in the manual. It is best to silently deprecate this feature now. * ccwl/ccwl.scm (collect-steps): Deprecate auto-connection of single input commands.
Diffstat (limited to 'ccwl/ccwl.scm')
-rw-r--r--ccwl/ccwl.scm15
1 files changed, 0 insertions, 15 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index f3d5c36..07eaeae 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -464,21 +464,6 @@ represented by <step> objects."
key))
input-keys)
(list)))
- ;; ccwl functions with only a single input when only a single key
- ;; is available at this step and when no inputs are passed to it
- ((function (step-id))
- (and (function-object #'function)
- (= (length input-keys) 1)
- (= (length (function-input-keys
- (function-object #'function)))
- 1))
- (collect-steps #`(function (step-id)
- #,(match (function-input-keys
- (function-object #'function))
- ((command-key) (symbol->keyword command-key)))
- #,(match input-keys
- ((input-key) (key-name input-key))))
- input-keys))
((function (step-id) args ...)
;; Run a whole bunch of tests so that we can produce useful error
;; messages.