From b4364bc88a0ed067b2ff14cda7016d3baed97721 Mon Sep 17 00:00:00 2001 From: Hans Dijkema Date: Wed, 18 Feb 2026 10:54:38 +0100 Subject: [PATCH] - --- info.rkt | 2 +- private/web-racket.rkt | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/info.rkt b/info.rkt index 8d96591..476f2bc 100644 --- a/info.rkt +++ b/info.rkt @@ -1,7 +1,7 @@ #lang info (define pkg-authors '(hnmdijkema)) -(define version "0.2.5") +(define version "0.2.6") (define license 'MIT) (define collection "web-racket") (define pkg-desc "web-racket - A Web Based GUI library, based on webui-wire") diff --git a/private/web-racket.rkt b/private/web-racket.rkt index d0a9954..5eed899 100644 --- a/private/web-racket.rkt +++ b/private/web-racket.rkt @@ -96,7 +96,7 @@ (define connected-callbacks (make-hash)) (define/public (callback evt . args) - (ww-debug (format "Callback for ~a - ~a - ~a" id evt args)) + (ww-debug (format "WW-ELEMENT%: Callback for ~a - ~a - ~a" id evt args)) (let ((cb (hash-ref connected-callbacks evt #f))) (unless (eq? cb #f) (with-handlers ([exn:fail? @@ -428,6 +428,7 @@ ([eq? type 'text] ww-input%) ([eq? type 'date] ww-input-date%) ([eq? type 'datetime-local] ww-input-datetime%) + ([eq? type 'range] ww-input-range%) (else ww-input%))) (else ww-element%)))