mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Patch [2794739] "fix: 2791591 [Enter] key doesn't work when [CapsLock] is on" from sash0k

Browse source
This commit is contained in:
Alexander Koblov 2009-05-21 09:51:22 +00:00
commit 9e8aa159f2
1 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/fmain.pas
View file

@ -72,7 +72,7 @@ type
actCopyFullNamesToClip: TAction;
actCutToClipboard: TAction;
actCopyToClipboard: TAction;
actChangeDirToRoot: TAction;
actChangeDirToRoot: TAction;
actCountDirContent: TAction;
actRightEqualLeft: TAction;
actLeftEqualRight: TAction;
@ -118,8 +118,8 @@ type
dskLeft: TKAStoolBar;
dskRight: TKAStoolBar;
edtCommand: TComboBox;
lblCommandPath: TLabel;
mnuCountDirContent: TMenuItem;
lblCommandPath: TLabel;
mnuCountDirContent: TMenuItem;
miLine22: TMenuItem;
miLine18: TMenuItem;
mnuHelpIndex: TMenuItem;
@ -1392,7 +1392,7 @@ begin
Key:=0;
with ActiveFrame do
begin
if Shift=[] then
if (Shift=[])or (Shift=[ssCaps]) then // 21.05.2009 - не учитываем CapsLock при перемещении по панелям
begin
if edtCommand.Focused and (edtCommand.Text='') then
begin
@ -1430,7 +1430,7 @@ begin
{$ENDIF}
Exit;
end;
end; //Shift=[]
end; //Shift=[] + 21.05.2009 - не учитываем CapsLock при перемещении по панелям
// execute active file or command line in terminal (Shift+Enter)
if Shift=[ssShift] then