-

info.rkt

@@ -1,7 +1,7 @@
 #lang info
 
 (define pkg-authors '(hnmdijkema))
-(define version "0.2.11")
+(define version "0.2.12")
 (define license 'MIT)   
 (define collection "web-racket")
 (define pkg-desc "web-racket - A Web Based GUI library, based on webui-wire")

private/web-wire.rkt

@@ -408,8 +408,8 @@
 
   (define (convert-result result)
     (let ((m (regexp-match re-generic-result result)))
-      (ww-debug result)
-      (ww-debug m)
+      (ww-debug (format "convert-result: ~a" result))
+      (ww-debug (format "match: ~a" m))
       (if m
           (let* ((ok (string=? (list-ref m 1) "OK"))
                  (kind (list-ref m 2))