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>
Wed, 16 Feb 2000 13:40:28 +0100
changeset 1355 ef6320ea43bc
parent 1354 92b8c51ccd20
child 1356 189c9cec8ce6
*** empty log message ***
MenuEditor.st file | annotate | diff | comparison | revisions 
--- a/MenuEditor.st	Wed Feb 16 11:20:05 2000 +0100
+++ b/MenuEditor.st	Wed Feb 16 13:40:28 2000 +0100
@@ -2220,7 +2220,8 @@
     clsName := (aspects at: #retriever) value.
 
     clsName size == 0 ifTrue:[
-        clsName := specClass
+        clsName := specClass.
+        clsName isNil ifTrue:[^ nil].
     ].
     ^ Smalltalk at:clsName ifAbsent:nil
 !
hg/stx-libtool2