Browse Source

Kitty keyboard protocol fix F1, F2 and F4 keys.

Margers 2 days ago
parent
commit
97e62a4999
1 changed files with 5 additions and 1 deletions
  1. 5 1
      packages/rtl-console/src/unix/keyboard.pp

+ 5 - 1
packages/rtl-console/src/unix/keyboard.pp

@@ -2310,7 +2310,11 @@ var
                      begin
                        str(modifier,st);
                        escStr:=escStr+'1;'+st;
-                     end;
+                     end else
+                     begin
+                       if ch in ['P','Q','S'] then { F1, F2, F4 }
+                         escStr:='_O';
+                      end;
                      escStr:=escStr+ch;
                      for i:=2 to length(escStr) do
                      begin