From 49230a3de9e4ff774fe39296089bacccbcfb8ee8 Mon Sep 17 00:00:00 2001
From: Omar Rizwan <omar@omar.website>
Date: Mon, 29 Jan 2024 14:33:23 -0500
Subject: keyboard,KeyCodes: Ignore instead of ? for invalid key codes

---
 virtual-programs/keyboard.folk | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'virtual-programs')

diff --git a/virtual-programs/keyboard.folk b/virtual-programs/keyboard.folk
index fbc895b0..829406c7 100644
--- a/virtual-programs/keyboard.folk
+++ b/virtual-programs/keyboard.folk
@@ -79,6 +79,8 @@ foreach keyboard $keyboardDevices {
             if {$type == 0x01} { ;# EV_KEY
                 set shift [dict get $modifiers shift]
                 set key [keyFromCode $code $shift]
+                if {$key eq ""} { continue }
+
                 set keyState [lindex $KEY_STATES $value]
 
                 set isDown [expr {$keyState != "up"}]
-- 
cgit v1.2.3