diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2021-02-26 00:03:27 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2021-02-26 00:03:27 +0100 |
commit | 89ae8c5fa52373444abb36075bcb539f71f533a6 (patch) | |
tree | 5a8910f5a0b25d33f3cddada42d7fc9825c6b078 | |
parent | 064bac7a84dabd136aff3f67ec09409835aef97f (diff) |
engine: run-node: Fix key-press handler arguments.
-rw-r--r-- | engine/node.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/engine/node.scm b/engine/node.scm index b46651e..3ecd1eb 100644 --- a/engine/node.scm +++ b/engine/node.scm @@ -1,6 +1,6 @@ ;;; Lisp Game Jam 2018 ;;; Copyright © 2018 David Thompson <davet@gnu.org> -;;; Copyright © 2018, 2019, 2020 Ricardo Wurmus <rekado@elephly.net> +;;; Copyright © 2018, 2019, 2020, 2021 Ricardo Wurmus <rekado@elephly.net> ;;; ;;; This program is free software: you can redistribute it and/or ;;; modify it under the terms of the GNU General Public License as @@ -245,7 +245,7 @@ one." (lambda () (visit-while (cut on-quit <>) *root-node*)) #:key-press - (lambda (key sc mods repeat?) + (lambda (key mods repeat?) (visit-while (cut on-key-press <> key mods repeat?) *root-node*)) #:text-input |