diff options
| -rw-r--r-- | ccwl/ccwl.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm index 8cc35b3..a6ef95d 100644 --- a/ccwl/ccwl.scm +++ b/ccwl/ccwl.scm @@ -318,4 +318,8 @@ re-matched." (define (write-cwl step file) (call-with-output-file file - (cut scm->yaml (step-run step) <>))) + (cut scm->yaml (let ((run (step-run step))) + (if (command? run) + (command->cwl run) + run)) + <>))) |