mirror of https://gitlab.com/basile.b/dexed.git
nothing
This commit is contained in:
parent
d3b689f2b6
commit
cb6c0a5091
|
@ -2765,7 +2765,6 @@ procedure TMainForm.actLayoutResetExecute(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
InitDocking(true);
|
InitDocking(true);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{$ENDREGION}
|
{$ENDREGION}
|
||||||
|
|
||||||
{$REGION edit ------------------------------------------------------------------}
|
{$REGION edit ------------------------------------------------------------------}
|
||||||
|
@ -3301,7 +3300,7 @@ begin
|
||||||
for i := fMultidoc.documentCount-1 downto 0 do
|
for i := fMultidoc.documentCount-1 downto 0 do
|
||||||
begin
|
begin
|
||||||
d := fMultidoc.document[i];
|
d := fMultidoc.document[i];
|
||||||
if not d.Equals(c) then
|
if d = c then
|
||||||
fMultidoc.closeDocument(d);
|
fMultidoc.closeDocument(d);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
Loading…
Reference in New Issue