In MAKE-NUMBER-INPUT-FIELD set default value field only if default

text is given.
This commit is contained in:
interp 2002-10-05 11:58:52 +00:00
parent 12b2b96582
commit 9e5d62aa77
1 changed files with 2 additions and 2 deletions

View File

@ -374,7 +374,7 @@
number-input-field-transformer number-input-field-transformer
`(input (@ (type "text") `(input (@ (type "text")
(name ,name) (name ,name)
(value ,default) ,(and default `(value ,default))
,(and attributes (cdr attributes)))))))))) ,(and attributes (cdr attributes))))))))))
(define (make-password-input-field . maybe-further-attributes) (define (make-password-input-field . maybe-further-attributes)