paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 01:49:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Harmonize kbAltUp, kbAltDown and kbAltRight declarations for xterm

Browse Source 
terminals with kbAltLeft. Only applied to Haiku to stay on the safe side. 
  Fix use of up, down and right arrow keys in fpide under Haiku 
  (mantis ) 

git-svn-id: trunk@13644 -
This commit is contained in:
olivier 2009-09-04 21:29:25 +00:00
parent 196e9f74e4
commit 7616e9e50e
1 changed files with 6 additions and 0 deletions

6
rtl/unix/keyboard.pp
View File

@ -1013,9 +1013,15 @@ const key_sequences:array[0..276] of key_sequence=(
(char:0;scan:kbAltDown;st:#27#27'[B'), {rxvt}
(char:0;scan:kbAltLeft;st:#27#27'[D'), {rxvt}
(char:0;scan:kbAltRight;st:#27#27'[C'), {rxvt}
{$ifdef HAIKU}
(char:0;scan:kbAltUp;st:#27#27'OA'),
(char:0;scan:kbAltDown;st:#27#27'OB'),
(char:0;scan:kbAltRight;st:#27#27'OC'),
{$else}
(char:0;scan:kbAltUp;st:#27'OA'),
(char:0;scan:kbAltDown;st:#27'OB'),
(char:0;scan:kbAltRight;st:#27'OC'),
{$endif}
(char:0;scan:kbAltLeft;st:#27#27'OD'),
(char:0;scan:kbAltPgUp;st:#27#27'[5~'), {rxvt}
(char:0;scan:kbAltPgDn;st:#27#27'[6~'), {rxvt}