paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-20 13:19:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Do not use C style assignments, because make fails on commandline, since the option -Sc is not set

Browse Source 
git-svn-id: trunk@34715 -
This commit is contained in:
michael 2012-01-12 16:44:18 +00:00
parent 724765c335
commit 78dc85c389
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/codetemplatesdlg.pas
View File

@ -374,7 +374,7 @@ begin
CodeBuf.LineColToPosition(XY.Y,XY.X,p); CodeBuf.LineColToPosition(XY.Y,XY.X,p);
if p>0 then begin if p>0 then begin
StartPos:=GetIdentStartPosition(CodeBuf.Source,p); StartPos:=GetIdentStartPosition(CodeBuf.Source,p);
XY.X += StartPos-p; XY.X := XY.X + StartPos-p;
end; end;
if not CodeToolBoss.ExtractProcedureHeader(CodeBuf,XY.X,XY.Y,Attributes,Value) if not CodeToolBoss.ExtractProcedureHeader(CodeBuf,XY.X,XY.Y,Attributes,Value)
then begin then begin