handle problems.

This commit is contained in:
2026-04-29 14:52:34 +02:00
parent 8710435d50
commit 267884c7c3
+4 -4
View File
@@ -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