event debugging
This commit is contained in:
@@ -182,6 +182,9 @@
|
|||||||
(cms (current-milliseconds))
|
(cms (current-milliseconds))
|
||||||
)
|
)
|
||||||
|
|
||||||
|
(dbg-webview "< ~a ~a && eq? ~a ~a && (eq? ~a ~a || eq? ~a ~a"
|
||||||
|
cms last-event-time last-event-kind event js-evt #f
|
||||||
|
last-js-event js-evt)
|
||||||
(unless (and
|
(unless (and
|
||||||
(< cms last-event-time)
|
(< cms last-event-time)
|
||||||
(eq? last-event-kind event)
|
(eq? last-event-kind event)
|
||||||
|
|||||||
Reference in New Issue
Block a user