diff --git a/racket-webview.rkt b/racket-webview.rkt index 416ce30..25e8531 100644 --- a/racket-webview.rkt +++ b/racket-webview.rkt @@ -1074,19 +1074,19 @@ (define/contract (webview-tray-set-icon! tray icon-file) (-> wv-tray? (or/c string? path?) symbol?) - (rkt-webview-tray-set-icon! tray (format "~a" icon-file))) + (rkt-webview-tray-set-icon! (wv-win-handle tray) (format "~a" icon-file))) (define/contract (webview-tray-set-tooltip! tray tooltip) (-> wv-tray? string? symbol?) - (rkt-webview-tray-set-tooltip! tray tooltip)) + (rkt-webview-tray-set-tooltip! (wv-win-handle tray) tooltip)) (define/contract (webview-tray-show-message tray title message) (-> wv-tray? string? string? symbol?) - (rkt-webview-tray-show-message tray title message)) + (rkt-webview-tray-show-message (wv-win-handle tray) title message)) (define/contract (webview-tray-set-menu! tray menu) (-> wv-tray? is-wv-menu? symbol?) - (rkt-webview-tray-set-menu! tray (wv-menu->json menu))) + (rkt-webview-tray-set-menu! (wv-win-handle tray) (wv-menu->json menu))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; delayed reactor