--- a/MemoryMonitorView.st	Sun Aug 29 03:14:39 1999 +0200
+++ b/MemoryMonitorView.st	Tue Aug 31 00:19:17 1999 +0200
@@ -558,10 +558,12 @@
 
 destroy
     updateBlock notNil ifTrue:[
-	Processor removeTimedBlock:updateBlock.
+        Processor removeTimedBlock:updateBlock.
     ] ifFalse:[
-	myProcess terminate.
-	myProcess := nil
+        myProcess notNil ifTrue:[
+            myProcess terminate.
+            myProcess := nil
+        ]
     ].
     oldData := newData := freeData := nil.
     super destroy
@@ -951,5 +953,5 @@
 !MemoryMonitorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitorView.st,v 1.3 1999-08-29 01:14:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MemoryMonitorView.st,v 1.4 1999-08-30 22:19:17 cg Exp $'
 ! !