--- a/ResourceSelectionBrowser.st	Mon Mar 06 21:36:02 2006 +0100
+++ b/ResourceSelectionBrowser.st	Mon Mar 13 17:56:35 2006 +0100
@@ -832,7 +832,7 @@
 
     class isNil ifTrue: [^self].
 
-    className := class theNonMetaclass name.
+    className := class name."/class theNonMetaclass name
 
     self withWaitCursorDo:[
         |newContents|