erabo/spiegel-keyman
1
0
Fork 0
mirror of https://github.com/keymanapp/keyman.git synced 2026-08-05 00:15:32 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 9

fix(developer): map shift key nextlayer property when importing OSK

Browse source 
Fixes: #14227
Test-bot: skip
This commit is contained in:
Marc Durdin 2026-06-22 15:48:19 +02:00
parent 58a565be21
commit b614411045
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
developer/src/kmconvert/Keyman.Developer.System.VisualKeyboardToTouchLayoutConverter.pas
View file

@ -319,6 +319,23 @@ function TVisualKeyboardToTouchLayoutConverter.SetupModifierKeysForImportedLayou
for l in p.Layers do
begin
// Find the Shift key and assign the next layer
k := l.FindKeyById('K_SHIFT');
if Assigned(k) then
begin
if l.id = 'default' then
begin
k.NextLayer := 'shift';
end
else
begin
// All layers other than default will return to default layer
// when shift is pressed, because we do not currently map
// shift+other mod layers with use of the Shift key in the import
k.NextLayer := 'default';
end;
end;
// Find the Ctrl key for the layer
k := l.FindKeyById('K_LCONTROL');
if not Assigned(k) then