# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1032773868 -7200
# Node ID 8aab97d1f5fe17ac231d63b4651cb5656cb58f43
# Parent  69dc29cf0fc5da26ed941ae0a940e5c408252bc1
care for empty input to className dialog

diff -r 69dc29cf0fc5 -r 8aab97d1f5fe 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]
             ]