From 6f27658c686fece83da9eecdf92fc37728eec6d5 Mon Sep 17 00:00:00 2001 From: interp Date: Fri, 1 Aug 2003 17:36:18 +0000 Subject: [PATCH] `cat ~/diff-sunet/4/log` --- scheme/httpd/surflets/surflet-input-fields.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/httpd/surflets/surflet-input-fields.scm b/scheme/httpd/surflets/surflet-input-fields.scm index bb8173b..bc4f126 100644 --- a/scheme/httpd/surflets/surflet-input-fields.scm +++ b/scheme/httpd/surflets/surflet-input-fields.scm @@ -255,7 +255,7 @@ select-options (map make-simple-select-option select-options))) -(define (make-select select-options maybe-further-attributes) +(define (make-select select-options . maybe-further-attributes) (let ((real-select-options (simple-options select-options))) (let-optionals maybe-further-attributes ((multiple? #f boolean?)