From eab6e3381363671d0c4abde04a9dc5e70115b37c Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Wed, 17 Mar 2021 17:01:39 +0530 Subject: Set default type of inputs to File. * ccwl/ccwl.scm (input): Set default type to File. --- ccwl/ccwl.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm index 120edcd..6d02ec3 100644 --- a/ccwl/ccwl.scm +++ b/ccwl/ccwl.scm @@ -32,7 +32,7 @@ (make-unspecified-default) unspecified-default?) -(define* (input id #:key type label (default (make-unspecified-default)) (other '())) +(define* (input id #:key (type 'File) label (default (make-unspecified-default)) (other '())) "Build and return an object." ;; The user should not set source. Hence, do not expose it as a ;; parameter of this constructor. -- cgit v1.2.3