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

removed debug code

Browse Source 
git-svn-id: trunk@9442 -
This commit is contained in:
vincents 2006-06-17 19:50:48 +00:00
parent 5d25e58f94
commit 1450af8607
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32lclintf.inc
View File

@ -108,8 +108,6 @@ begin
FWaitPipeHandlers := lHandler^.Next; FWaitPipeHandlers := lHandler^.Next;
if lHandler^.Next <> nil then if lHandler^.Next <> nil then
lHandler^.Next^.Prev := lHandler^.Prev; lHandler^.Next^.Prev := lHandler^.Prev;
FILLCHAR(LHandler^, sizeof(TPipeEventInfo), 0);
DebugLn(['TWin32WidgetSet.RemovePipeEventHandler', lHandler]);
Dispose(lHandler); Dispose(lHandler);
AHandler := nil; AHandler := nil;
end; end;