checking for lost-view bug
authorClaus Gittinger <cg@exept.de>
Wed, 02 Apr 1997 20:11:57 +0200
changeset 1516 0e42b4c18cf1
parent 1515 2bf89d832d58
child 1517 ac751bb3dfdf
checking for lost-view bug
DevViewH.st
--- a/DevViewH.st	Wed Apr 02 20:10:39 1997 +0200
+++ b/DevViewH.st	Wed Apr 02 20:11:57 1997 +0200
@@ -60,15 +60,17 @@
             device destroyGC:gcId.
             gcId := nil.
         ].
+"/ 'GC destroy: ' print. drawableId displayString printCR.
+"/ device checkKnownViewId:drawableId.
         device destroyView:nil withId:drawableId.
         drawableId := nil.
     ].
 
-    "Modified: 22.3.1997 / 14:57:06 / cg"
+    "Modified: 2.4.1997 / 20:11:46 / cg"
 ! !
 
 !DeviceViewHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/DevViewH.st,v 1.9 1997-03-22 14:18:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/DevViewH.st,v 1.10 1997-04-02 18:11:57 cg Exp $'
 ! !