--- a/StandardSystemView.st	Mon Aug 03 20:04:29 1998 +0200
+++ b/StandardSystemView.st	Mon Aug 03 20:05:59 1998 +0200
@@ -471,11 +471,13 @@
 !
 
 quit
-    "same as closeRequest (but sometimes send via the sensors event queue)"
+    "same as closeRequest 
+     (but sometimes sent via the sensors event queue from VW programs)"
 
     self closeRequest
 
     "Created: / 30.10.1997 / 19:23:01 / cg"
+    "Modified: / 3.8.1998 / 20:04:22 / cg"
 ! !
 
 !StandardSystemView methodsFor:'accessing'!
@@ -790,12 +792,6 @@
 
 !StandardSystemView methodsFor:'destroying'!
 
-closeRequest 
-    "programmatic close request"
-
-    ^ self terminate
-!
-
 destroy
     "destroy the view."
 
@@ -833,10 +829,12 @@
      to send this request; some simply distroy the view."
 
     application notNil ifTrue:[
-	application closeRequestFor:self
+        application closeRequestFor:self
     ] ifFalse:[
-	super terminate
+        self closeRequest.
     ]
+
+    "Modified: / 3.8.1998 / 19:49:45 / cg"
 ! !
 
 !StandardSystemView methodsFor:'event handling'!
@@ -1425,6 +1423,6 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.99 1998-06-20 20:21:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.100 1998-08-03 18:05:59 cg Exp $'
 ! !
 StandardSystemView initialize!