mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 01:39:31 +02:00
only use initialized value of FShortcutHandled, not previous one
git-svn-id: trunk@8149 -
This commit is contained in:
parent
4b692a0b16
commit
a9e0c4e0f2
@ -155,8 +155,8 @@ begin
|
||||
FShortcutHandled := true;
|
||||
Item.InitiateActions;
|
||||
Item.Click;
|
||||
Result := FShortcutHandled;
|
||||
end;
|
||||
Result := FShortcutHandled;
|
||||
end;
|
||||
|
||||
{------------------------------------------------------------------------------
|
||||
|
Loading…
Reference in New Issue
Block a user