#REFACTORING
authorClaus Gittinger <cg@exept.de>
Thu, 11 Feb 2016 15:44:28 +0100
changeset 3722 2038d4cd1afa
parent 3720 feb40f6fb806
child 3723 2f54e08160b4
child 3724 3c722e973dd0
#REFACTORING class: TerminalSession changed: #sendInterruptSignal #sendKillSignal eliminated low-level knowledge about negative process IDs to interrupt groups
TerminalSession.st
--- a/TerminalSession.st	Mon Feb 08 10:25:01 2016 +0100
+++ b/TerminalSession.st	Thu Feb 11 15:44:28 2016 +0100
@@ -532,7 +532,8 @@
     "send an INT-signal to the shell (UNIX only)"
 
     shellPid notNil ifTrue:[
-        OperatingSystem sendSignal:(OperatingSystem sigINT) to:shellPid negated.
+        OperatingSystem interruptProcessGroup:shellPid.
+        "/ OperatingSystem interruptProcess:shellPid. ???
     ].
 
     "Modified: / 10.6.1998 / 17:49:49 / cg"
@@ -542,7 +543,9 @@
     "send a KILL-signal to the shell (UNIX only)"
 
     shellPid notNil ifTrue:[
-        OperatingSystem sendSignal:(OperatingSystem sigKILL) to:shellPid negated.
+        OperatingSystem killProcessGroup:shellPid.
+        OperatingSystem killProcess:shellPid.
+        OperatingSystem childProcessWait:false pid:shellPid.
     ]
 !