mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-27 16:07:37 +01:00
ide: fixed a typo in the version info Assign method (bug #0017595)
git-svn-id: trunk@27650 -
This commit is contained in:
parent
1589de464e
commit
6ffbf6e16e
@ -661,7 +661,7 @@ var
|
|||||||
begin
|
begin
|
||||||
if Equals(aTable) then exit;
|
if Equals(aTable) then exit;
|
||||||
Clear;
|
Clear;
|
||||||
for i := 0 to Count - 1 do
|
for i := 0 to aTable.Count - 1 do
|
||||||
inherited Add(aTable.Keys[i],aTable.ValuesByIndex[i]);
|
inherited Add(aTable.Keys[i],aTable.ValuesByIndex[i]);
|
||||||
DoModified;
|
DoModified;
|
||||||
end;
|
end;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user