fixed indenter bug (I swear I fixed this bug years ago!)

This commit is contained in:
Christian Hammacher 2006-05-11 16:03:18 +00:00
parent b2b001c9e4
commit 567044c381
4 changed files with 4 additions and 2 deletions

View File

@ -115,7 +115,7 @@ AutoIncBuild=1
MajorVer=1 MajorVer=1
MinorVer=4 MinorVer=4
Release=2 Release=2
Build=9 Build=10
Debug=0 Debug=0
PreRelease=0 PreRelease=0
Special=0 Special=0
@ -126,7 +126,7 @@ CodePage=1252
[Version Info Keys] [Version Info Keys]
CompanyName=AMX Mod X Dev Team CompanyName=AMX Mod X Dev Team
FileDescription= FileDescription=
FileVersion=1.4.2.9 FileVersion=1.4.2.10
InternalName=gaben InternalName=gaben
LegalCopyright=AMX Mod X Dev Team LegalCopyright=AMX Mod X Dev Team
LegalTrademarks= LegalTrademarks=

Binary file not shown.

Binary file not shown.

View File

@ -213,6 +213,8 @@ begin
if CountChars(eStr[i], '{') <> CountChars(eStr[i], '}') then if CountChars(eStr[i], '{') <> CountChars(eStr[i], '}') then
eIndent := eIndent + CountChars(eStr[i], '{'); eIndent := eIndent + CountChars(eStr[i], '{');
if (i+1 < eStr.Count) and (Trim(RemoveStringsAndComments(eStr[i +1], true, true)) = '{') then
eTempIndent := eTempIndent -1;
frmMain.pbLoading.Position := frmMain.sciEditor.Lines.Count + i -1; frmMain.pbLoading.Position := frmMain.sciEditor.Lines.Count + i -1;
SetProgressStatus('Indenting Code...'); SetProgressStatus('Indenting Code...');