wrong contract

2026-04-29 14:41:24 +02:00
parent 97acd18a88
commit 8710435d50
1 changed files with 1 additions and 1 deletions
@@ -1059,7 +1059,7 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 (define/contract (webview-tray-create icon-file event-callback #:tooltip [tooltip ""])
-  (->* ((or/c string? path?) procedure?) (#:tooltip string?) wv-win?)
+  (->* ((or/c string? path?) procedure?) (#:tooltip string?) wv-tray?)
  (let* ((h (make-wv-win #f #f -1 'tray))
         (event-processor
          (lambda (wv evt)