paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 17:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* typo fixed for win32

Browse Source
This commit is contained in:
peter 1999-09-22 09:03:58 +00:00
parent 00b063c621
commit 518654d1b0
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
ide/text/fpredir.pas
View File

@ -536,12 +536,12 @@ end;
Shell(Progname+' '+Comline);
{$else}
{$ifdef win32}
StoreInherit:=ExecInheritsHandles;
ExecInheritsHandles:=true;
StoreInherit:=ExecInheritedHandles;
ExecInheritedHandles:=true;
{$endif win32}
Dos.Exec (ProgName, ComLine);
{$ifdef win32}
ExecInheritsHandles:=StoreInherit;
ExecInheritedHandles:=StoreInherit;
{$endif win32}
{$endif}
IOStatus:=DosError;
@ -716,7 +716,10 @@ Begin
End.
{
$Log$
Revision 1.21 1999-09-21 11:28:22 pierre
Revision 1.22 1999-09-22 09:03:58 peter
* typo fixed for win32
Revision 1.21 1999/09/21 11:28:22 pierre
+ Redir for win32
Revision 1.20 1999/08/05 16:54:36 peter