--- a/DeviceWorkstation.st	Sun Jan 07 14:29:38 1996 +0100
+++ b/DeviceWorkstation.st	Sun Jan 07 14:30:15 1996 +0100
@@ -2102,11 +2102,6 @@
      This ends the dispatcher process when the last view is closed on that device.
      We only do this for displays other that the default Display."
 
-    "/ claus:
-    "/ I disabled this - there are times when no views
-    "/ are present, but a new one is soon to be opened
-    "/ Its better to keep the event dispatcher alive ...
-
     self == Display ifTrue:[^ self].
 
     knownViews notNil ifTrue:[
@@ -3724,6 +3719,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.65 1996-01-07 13:29:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.66 1996-01-07 13:30:15 cg Exp $'
 ! !
 DeviceWorkstation initialize!