Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sun, 10 May 2009 22:50:12 +0200
changeset 2507 42c9db715d33
parent 2506 b85f4799add5
child 2508 d9dc378aaf8d
*** empty log message ***
UIPainter.st file | annotate | diff | comparison | revisions 
--- a/UIPainter.st	Sun May 10 22:49:57 2009 +0200
+++ b/UIPainter.st	Sun May 10 22:50:12 2009 +0200
@@ -5884,7 +5884,9 @@
     lastDrawnMaster := nil.
     windowSpec := nil.
 
-    self canvas components notEmptyOrNil ifTrue:[ self halt ].
+    self canvas components copy do:[:aView|
+        aView destroy
+    ].
     self canvas subViews copy do:[:aView|
         "/ care to not destroy the transparent input view
         (aView isInputOnly) ifFalse:[aView destroy]
hg/stx-libtool2