mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 13:49:15 +02:00
* hopfully the bug on wrong Menu config fixed
This commit is contained in:
parent
3df7f51b0a
commit
f328e1860f
@ -1294,7 +1294,7 @@ var OldState: word;
|
|||||||
begin
|
begin
|
||||||
OldState:=State;
|
OldState:=State;
|
||||||
inherited SetState(AState,Enable);
|
inherited SetState(AState,Enable);
|
||||||
if ((AState xor OldState) and sfActive)<>0 then
|
if ((State xor OldState) and sfActive)<>0 then
|
||||||
UpdateCommands;
|
UpdateCommands;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -3217,7 +3217,10 @@ end;
|
|||||||
END.
|
END.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.60 2000-02-07 23:40:38 pierre
|
Revision 1.61 2000-03-01 22:32:48 pierre
|
||||||
|
* hopfully the bug on wrong Menu config fixed
|
||||||
|
|
||||||
|
Revision 1.60 2000/02/07 23:40:38 pierre
|
||||||
* avoid closing the StackWindow too early
|
* avoid closing the StackWindow too early
|
||||||
|
|
||||||
Revision 1.59 2000/02/07 10:36:43 michael
|
Revision 1.59 2000/02/07 10:36:43 michael
|
||||||
|
Loading…
Reference in New Issue
Block a user