mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-28 12:02:48 +02:00
fixed typo.
git-svn-id: trunk@6274 -
This commit is contained in:
parent
020ed4dbc7
commit
588587c29e
@ -168,7 +168,7 @@ procedure TLazarusManager.WaitForLazarus;
|
||||
begin
|
||||
ProcessHandle := OpenProcess(SYNCHRONIZE, false, PID);
|
||||
if ProcessHandle<>HWND(nil) then begin
|
||||
WaitForSingleObject(ProcessHandle, INFINITE) of
|
||||
WaitForSingleObject(ProcessHandle, INFINITE);
|
||||
CloseHandle(ProcessHandle);
|
||||
end;
|
||||
end;
|
||||
@ -261,6 +261,9 @@ end;
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.12 2004/11/20 13:14:28 vincents
|
||||
fixed typo.
|
||||
|
||||
Revision 1.11 2004/11/19 12:23:43 vincents
|
||||
fixed WaitForLazarus: close process handle after use.
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user