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

clena up

Browse Source 
git-svn-id: trunk@19524 -
This commit is contained in:
mattias 2009-04-20 13:26:57 +00:00
parent 21b15fd2c8
commit bd60177766
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/codeexplorer.pas
View File

@ -893,7 +893,6 @@ begin
ctnAsmBlock: ctnAsmBlock:
begin begin
DebugLn(['TCodeExplorerView.CreateFigures ',Tool.ExtractNode(CodeNode,[])]);
if (cefcEmptyBlocks in Figures) if (cefcEmptyBlocks in Figures)
and CodeIsOnlySpace(Tool.Src,CodeNode.StartPos+length('asm'), and CodeIsOnlySpace(Tool.Src,CodeNode.StartPos+length('asm'),
CodeNode.EndPos-length('end')-1) CodeNode.EndPos-length('end')-1)