changed: #findClass:single:in:
authorClaus Gittinger <cg@exept.de>
Thu, 17 Jun 2010 13:20:12 +0200
changeset 9499 cb8c9a26f1c7
parent 9498 0512699ffc08
child 9500 76bc64543166
changed: #findClass:single:in:
NewSystemBrowser.st
Tools__NewSystemBrowser.st
--- a/NewSystemBrowser.st	Wed Jun 09 12:21:03 2010 +0200
+++ b/NewSystemBrowser.st	Thu Jun 17 13:20:12 2010 +0200
@@ -30490,7 +30490,7 @@
                 classes size == 1 ifTrue:[
                     className := class name
                 ] ifFalse:[
-                    classNames := classes collect:[:each| (each name?'') , ' (',each package?'?',')'].
+                    classNames := classes collect:[:each| (each name?'') , ' (',(each package?'?'),')'].
                     classNameArg includesMatchCharacters ifFalse:[
                         classNames := classNames
                                         collect:[:nm |
@@ -30585,7 +30585,7 @@
     ]
 
     "Created: / 13-02-2000 / 20:35:30 / cg"
-    "Modified: / 10-11-2006 / 17:14:15 / cg"
+    "Modified: / 17-06-2010 / 12:24:21 / cg"
 !
 
 findResponseTo:selector
@@ -44475,11 +44475,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1461 2010-05-18 13:19:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1462 2010-06-17 11:20:12 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1461 2010-05-18 13:19:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/NewSystemBrowser.st,v 1.1462 2010-06-17 11:20:12 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!
--- a/Tools__NewSystemBrowser.st	Wed Jun 09 12:21:03 2010 +0200
+++ b/Tools__NewSystemBrowser.st	Thu Jun 17 13:20:12 2010 +0200
@@ -30490,7 +30490,7 @@
                 classes size == 1 ifTrue:[
                     className := class name
                 ] ifFalse:[
-                    classNames := classes collect:[:each| (each name?'') , ' (',each package?'?',')'].
+                    classNames := classes collect:[:each| (each name?'') , ' (',(each package?'?'),')'].
                     classNameArg includesMatchCharacters ifFalse:[
                         classNames := classNames
                                         collect:[:nm |
@@ -30585,7 +30585,7 @@
     ]
 
     "Created: / 13-02-2000 / 20:35:30 / cg"
-    "Modified: / 10-11-2006 / 17:14:15 / cg"
+    "Modified: / 17-06-2010 / 12:24:21 / cg"
 !
 
 findResponseTo:selector
@@ -44475,11 +44475,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1461 2010-05-18 13:19:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1462 2010-06-17 11:20:12 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1461 2010-05-18 13:19:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1462 2010-06-17 11:20:12 cg Exp $'
 ! !
 
 NewSystemBrowser initialize!