Remove modifiers from KeyValue

morphx666 · Apr 10, 2024 · bd4edc1 · bd4edc1
1 parent 123daa3
commit bd4edc1
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/x8086NetEmu/Adapters/Adapter.vb b/x8086NetEmu/Adapters/Adapter.vb
@@ -257,7 +257,7 @@
         Public SuppressKeyPress As Boolean
 
         Public Sub New(keyValue As Integer, modifiers As Integer)
-            Me.KeyValue = keyValue
+            Me.KeyValue = keyValue And (Not modifiers)
             Me.Modifiers = modifiers
             Me.Alt = (modifiers And Keys.Alt) = Keys.Alt
             Me.Control = (modifiers And Keys.Control) = Keys.Control