diff options
| -rw-r--r-- | ccwl/ccwl.scm | 2 |
1 files changed, 1 insertions, 1 deletions
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 <input> object." ;; The user should not set source. Hence, do not expose it as a ;; parameter of this constructor. |