diff --git a/racket-webview.rkt b/racket-webview.rkt index d66008b..416ce30 100644 --- a/racket-webview.rkt +++ b/racket-webview.rkt @@ -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)