diff options
Diffstat (limited to 'examples')
| -rwxr-xr-x | examples/2048/2048.scm | 3 | ||||
| -rw-r--r-- | examples/common.scm | 2 | ||||
| -rw-r--r-- | examples/mines/mines.scm | 2 |
3 files changed, 3 insertions, 4 deletions
diff --git a/examples/2048/2048.scm b/examples/2048/2048.scm index 05eb78b..e9eb16d 100755 --- a/examples/2048/2048.scm +++ b/examples/2048/2048.scm @@ -264,9 +264,8 @@ ;;; Rendering ;;; -(open-window) +(init-window) (enable-fonts) -(enable-audio) (define background (rgb #xfaf8ef)) diff --git a/examples/common.scm b/examples/common.scm index 65e02df..915c5fa 100644 --- a/examples/common.scm +++ b/examples/common.scm @@ -20,7 +20,7 @@ (sly-init) -(add-hook! key-press-hook (lambda (key unicode) +(add-hook! key-press-hook (lambda (key) (when (eq? key 'escape) (stop-game-loop)))) diff --git a/examples/mines/mines.scm b/examples/mines/mines.scm index 0b55d8b..fd7256f 100644 --- a/examples/mines/mines.scm +++ b/examples/mines/mines.scm @@ -288,7 +288,7 @@ ;;; View ;;; -(open-window) +(init-window) (enable-fonts) (define font (load-default-font)) |