Minor change in FIND-IMAGE-BUTTON-COORDINATE.

This commit is contained in:
interp 2003-07-14 09:10:36 +00:00
parent 44268c5c4a
commit b532f8a991
1 changed files with 1 additions and 2 deletions

View File

@ -500,8 +500,7 @@
(let* ((name (input-field-name image-button))) (let* ((name (input-field-name image-button)))
(cond (cond
((assoc (string-append name suffix) bindings) ((assoc (string-append name suffix) bindings)
=> (lambda (pair) => cdr)
(cdr pair)))
(else #f)))) (else #f))))
;;EOF ;;EOF