Add key-event-end? function (#51)

pull/8675/head
Tom Schafer 2025-07-20 19:05:50 +01:00 committed by GitHub
parent 69c16ea59a
commit 28bdf667d9
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 9 additions and 0 deletions

View File

@ -1673,6 +1673,7 @@ event: Event?"#, $name, $name));
"up" => Up, "up" => Up,
"down" => Down, "down" => Down,
"home" => Home, "home" => Home,
"end" => End,
"page-up" => PageUp, "page-up" => PageUp,
"page-down" => PageDown, "page-down" => PageDown,
"tab" => Tab, "tab" => Tab,

View File

@ -2628,6 +2628,14 @@ Check whether the given event is the key: home
(key-event-home? event) (key-event-home? event)
``` ```
event: Event? event: Event?
### **key-event-end?**
Check whether the given event is the key: end
```scheme
(key-event-end? event)
```
event: Event?
### **key-event-page-up?** ### **key-event-page-up?**
Check whether the given event is the key: page-up Check whether the given event is the key: page-up