--- a/SystemStatusMonitor.st	Thu Sep 23 14:15:54 1999 +0200
+++ b/SystemStatusMonitor.st	Thu Sep 23 14:45:18 1999 +0200
@@ -38,7 +38,9 @@
     top extent:monitor preferredExtent.
     top label:self defaultLabel.
     top icon:self defaultIcon.
-    top open
+    top open.
+
+    ^ monitor
 
     "
      ProcessMonitor open
@@ -214,5 +216,5 @@
 !SystemStatusMonitor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SystemStatusMonitor.st,v 1.8 1998-09-24 10:08:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SystemStatusMonitor.st,v 1.9 1999-09-23 12:45:18 stefan Exp $'
 ! !