care for empty input to className dialog
authorClaus Gittinger <cg@exept.de>
Mon, 23 Sep 2002 11:37:48 +0200
changeset 1605 8aab97d1f5fe
parent 1604 69dc29cf0fc5
child 1606 54f978ea4b66
care for empty input to className dialog
ResourceSelectionBrowser.st
--- a/ResourceSelectionBrowser.st	Mon Sep 16 12:15:16 2002 +0200
+++ b/ResourceSelectionBrowser.st	Mon Sep 23 11:37:48 2002 +0200
@@ -840,7 +840,7 @@
     aClassOrSymbol isClass 
         ifTrue: [resourceClass := aClassOrSymbol name] 
         ifFalse: [
-            aClassOrSymbol notNil ifTrue:[
+            aClassOrSymbol size > 0 ifTrue:[
                 (Smalltalk at: aClassOrSymbol) notNil
                 ifTrue: [resourceClass := aClassOrSymbol]
             ]