Debugging problems with webui.

Signed-off-by: Hans Dijkema <hans@dijkewijk.nl>
This commit is contained in:
2025-11-04 13:21:37 +01:00
parent a6ca5387bf
commit 58a448c5ee
4 changed files with 33 additions and 26 deletions

View File

@@ -640,12 +640,12 @@
(define/override (html-loaded)
(ww-debug "HTML LOADED")
(super html-loaded)
(let* ((btn (send this element 'app-button)))
(send btn connect 'click (λ (data)
(new test-dialog% [parent this]))))
(ww-debug "SETTING MENU")
(send this set-menu! test-menu)
(send this connect-menu! 'm-quit (λ () (send this close)))
;(let* ((btn (send this element 'app-button)))
; (send btn connect 'click (λ (data)
; (new test-dialog% [parent this]))))
;(ww-debug "SETTING MENU")
;(send this set-menu! test-menu)
;(send this connect-menu! 'm-quit (λ () (send this close)))
)
(begin