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

synedit: clean up

Browse Source 
git-svn-id: trunk@40615 -
This commit is contained in:
mattias 2013-03-21 23:10:14 +00:00
parent faeff278b9
commit bef5514dd1
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/synbeautifier.pas
View File

@ -40,7 +40,7 @@ unit SynBeautifier;
interface
uses
Classes, SysUtils, math, LCLProc, SynEditMiscClasses, SynEditMiscProcs, LazSynEditText, SynEditPointClasses,
Classes, SysUtils, LCLProc, SynEditMiscClasses, SynEditMiscProcs, LazSynEditText, SynEditPointClasses,
SynEditKeyCmds, SynHighlighterPas, SynEditHighlighterFoldBase, SynRegExpr;
type

2
components/synedit/syneditmarks.pp
View File

@ -733,8 +733,6 @@ end;
function TSynEditMarkLineList.GetOrAddMarkLine(LineNum: Integer;
AddIfNotExist: Boolean; UseNext: Boolean = False): TSynEditMarkLine;
var
rStartPosition: Integer;
p: TSynEditMarkLine;
d1, d2: Integer;
begin
if AddIfNotExist then