aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ccwl/ccwl.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/ccwl/ccwl.scm b/ccwl/ccwl.scm
index 2dc3b66..24e86f0 100644
--- a/ccwl/ccwl.scm
+++ b/ccwl/ccwl.scm
@@ -23,8 +23,8 @@
input?
(id input-id)
(type input-type)
- (default input-default)
(label input-label)
+ (default input-default)
(other input-other))
(define-immutable-record-type <unspecified-default>
@@ -33,7 +33,7 @@
(define* (input id #:key type label (default (make-unspecified-default)) (other '()))
"Build and return an <input> object."
- (make-input id type default label other))
+ (make-input id type label default other))
(define-immutable-record-type <output>
(make-output id type binding source other)