TerminalView.st
changeset 2597 c7e8bfde1852
parent 2594 63c4f60955be
child 2678 f475a905c54c
--- a/TerminalView.st	Fri Dec 19 09:41:45 2003 +0100
+++ b/TerminalView.st	Wed Dec 31 19:38:14 2003 +0100
@@ -1432,7 +1432,9 @@
 doSendInterrupt
     "send an INT-signal to the shell (UNIX only)"
 
-    OperatingSystem sendSignal:(OperatingSystem sigINT) to:shellPid negated.
+    shellPid notNil ifTrue:[
+        OperatingSystem sendSignal:(OperatingSystem sigINT) to:shellPid negated.
+    ].
 
     "Modified: / 10.6.1998 / 17:49:49 / cg"
 !
@@ -1440,7 +1442,9 @@
 doSendKillSignal
     "send a KILL-signal to the shell (UNIX only)"
 
-    OperatingSystem sendSignal:(OperatingSystem sigKILL) to:shellPid negated.
+    shellPid notNil ifTrue:[
+        OperatingSystem sendSignal:(OperatingSystem sigKILL) to:shellPid negated.
+    ]
 !
 
 editMenu
@@ -1853,7 +1857,7 @@
 !TerminalView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.121 2003-12-18 15:13:09 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/TerminalView.st,v 1.122 2003-12-31 18:38:14 cg Exp $'
 ! !
 
 TerminalView initialize!