diff options
| author | Arun Isaac | 2024-09-13 04:25:17 +0100 |
|---|---|---|
| committer | Arun Isaac | 2024-09-13 04:25:17 +0100 |
| commit | 99f1bcc440b81aefde733149598cfa6c396bcde9 (patch) | |
| tree | 59c74c8a1da3fef47c6112929fc8992a83173fa5 | |
| parent | 7337e4ae6994f2e53b37f98b1134cc23c64de952 (diff) | |
| download | ravanan-99f1bcc440b81aefde733149598cfa6c396bcde9.tar.gz ravanan-99f1bcc440b81aefde733149598cfa6c396bcde9.tar.lz ravanan-99f1bcc440b81aefde733149598cfa6c396bcde9.zip | |
command-line-tool: Create vectors of secondary files for recursion.
* ravanan/command-line-tool.scm (resolve-inputs)[resolve]: When
recursing, create a vector of secondary files.
| -rw-r--r-- | ravanan/command-line-tool.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ravanan/command-line-tool.scm b/ravanan/command-line-tool.scm index 9fd8b51..5170df4 100644 --- a/ravanan/command-line-tool.scm +++ b/ravanan/command-line-tool.scm @@ -430,7 +430,8 @@ error out." (resolve input (make-vector (vector-length input) (assoc-ref type-tree "items")) - maybe-secondary-files)) + (make-vector (vector-length input) + maybe-secondary-files))) ;; Intern File type inputs and fully resolve them. ((eq? matched-type 'File) (let ((resolved-input (canonicalize-file-input input))) |