diff --git a/scheme/httpd/surflets/surflet-input-fields.scm b/scheme/httpd/surflets/surflet-input-fields.scm index 8f6b9d2..172ab5a 100644 --- a/scheme/httpd/surflets/surflet-input-fields.scm +++ b/scheme/httpd/surflets/surflet-input-fields.scm @@ -470,13 +470,6 @@ (make-button "reset" (generate-input-field-name "reset") button-caption attributes))) -(define (make-image-button image-source . maybe-further-attributes) - (let-optionals maybe-further-attributes - ((attributes '() sxml-attribute?)) - (make-button "image" (generate-input-field-name "imgbtn") - #f `(@ (src ,image-source) - ,@(sxml-attribute-attributes attributes))))) - ;; Image buttons cannot be simple buttons, as the browser does not ;; send their simple name, but the coordinates where the user clicked ;; into. Thanks to Eric Knauel for reporting this bug.