paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-06 00:57:19 +01:00
Code Issues Packages Projects Releases Wiki Activity

LCL: formatting.

Browse Source 
git-svn-id: trunk@47254 -
This commit is contained in:
juha 2014-12-27 16:25:16 +00:00
parent 918e221f36
commit 05ae42b58d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/include/customnotebook.inc
View File

@ -184,7 +184,7 @@ begin
else
ActivePage := nil;
//NewPageIndex := NewIndex;
APage := TCustomPage(FPageList[CurIndex]);
APage := TCustomPage(FPageList[CurIndex]);
// calculate new control index (i.e. ZOrderPosition)
if NewIndex >= FPageList.Count - 1 then