commit 9881355ee5389c76e51dd1b592beca8a44cbd59d
parent f6f3ed17fafde3ce9390c4be0405982f9eece2b8
Author: Yuval Langer <yuval.langer@gmail.com>
Date: Sun, 16 Jun 2024 05:18:49 +0300
Fix typo in a procedure name definition.
Diffstat:
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/pstk.scm b/pstk.scm
@@ -811,7 +811,7 @@ proc evalCmdFromScm {cmd {properly 0}} {
(set! tk-is-running #f)
(wish "after 200 exit"))
-(define (ispatch-event)
+(define (dispatch-event)
(let ((tk-statement (read-wish)))
(if (and (list? tk-statement)
(eq? (car tk-statement) 'call))