diff --git a/ChangeLog.txt b/ChangeLog.txt index 812cd56600..ce7e0d0ca7 100644 --- a/ChangeLog.txt +++ b/ChangeLog.txt @@ -10,6 +10,12 @@ * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment */ +2015-09-17 16:07 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) + * src/rtl/hbproces.c + * In OS2 builds use fGentle parameter of hb_fsProcessClose() to + control if kill signal should be send only to child process or + also to its all descendant processes. + 2015-09-17 15:58 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) * src/rtl/filesys.c * pacified warnings in GCC OS2 builds diff --git a/src/rtl/hbproces.c b/src/rtl/hbproces.c index c09860e802..f7f7d6d131 100644 --- a/src/rtl/hbproces.c +++ b/src/rtl/hbproces.c @@ -1008,11 +1008,9 @@ HB_BOOL hb_fsProcessClose( HB_FHANDLE hProcess, HB_BOOL fGentle ) { PID pid = ( PID ) hProcess; - HB_SYMBOL_UNUSED( fGentle ); - if( pid > 0 ) { - APIRET ret = DosKillProcess( DKP_PROCESS, pid ); + APIRET ret = DosKillProcess( fGentle ? DKP_PROCESS : DKP_PROCESSTREE, pid ); fResult = ret == NO_ERROR; hb_fsSetError( ( HB_ERRCODE ) ret );