Rename SELECT-MULTIPLE-TRANSFORMER to MULTIPLE-SELECT-TRANSFORMER to make things clearer.

This commit is contained in:
interp 2003-07-15 14:39:55 +00:00
parent 3d5a92eb44
commit 0a510b7c76
1 changed files with 2 additions and 2 deletions

View File

@ -272,7 +272,7 @@
;; internal
(define (make-multiple-select name select-options attributes)
(make-multi-input-field name "mult-select"
select-multiple-transformer
multiple-select-transformer
(make-field-attributes
select-options
`((multiple)
@ -291,7 +291,7 @@
(sxml-attribute-attributes attributes))
make-select-html-tree))
(define (select-multiple-transformer select bindings)
(define (multiple-select-transformer select bindings)
(let ((name (input-field-name select))
(select-options (field-attributes-default
(input-field-attributes select))))