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.
care for nil window
authorClaus Gittinger <cg@exept.de>
Thu, 17 Feb 2000 16:00:43 +0100
changeset 1360 555429506474
parent 1359 ea946edbf5fb
child 1361 9020214f03e6
care for nil window
UIPainter.st file | annotate | diff | comparison | revisions 
--- a/UIPainter.st	Thu Feb 17 16:00:12 2000 +0100
+++ b/UIPainter.st	Thu Feb 17 16:00:43 2000 +0100
@@ -3687,7 +3687,9 @@
             list := cls perform:#aspectSelectors ifNotUnderstood:nil.
         ].
         spec setExportedAspectsFrom:list.
-        windowSpec exportedAspects:(spec exportedAspects).
+        windowSpec notNil ifTrue:[
+            windowSpec exportedAspects:(spec exportedAspects).
+        ]
     ].
 
     self propertiesDo:[:aProp| |aspect entry|
hg/stx-libtool2