class: Tools::NewSystemBrowser
authorStefan Vogel <sv@exept.de>
Tue, 08 Apr 2014 17:08:42 +0200
changeset 14180 a733ee8a8dd5
parent 14179 5e579b127f8d
child 14181 caed101a1990
class: Tools::NewSystemBrowser changed: #selectedProtocolsAsEnvironment
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Tue Apr 08 17:08:25 2014 +0200
+++ b/Tools__NewSystemBrowser.st	Tue Apr 08 17:08:42 2014 +0200
@@ -18663,7 +18663,7 @@
         class: classes anyOne
         protocols: protocols;
         label:(protocols size = 1
-                    ifTrue:[ 'protocol' , protocols anyOne , ' in ' , classes anyOne name ]
+                    ifTrue:[ 'protocol' , protocols anElement printString , ' in ' , classes anElement name ]
                     ifFalse:[ protocols size printString , ' protocols in ' , classes anyOne name ]);
         yourself
 
@@ -61428,11 +61428,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2050 2014-04-05 08:30:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2051 2014-04-08 15:08:42 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2050 2014-04-05 08:30:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.2051 2014-04-08 15:08:42 stefan Exp $'
 !
 
 version_HG
@@ -61441,7 +61441,7 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2050 2014-04-05 08:30:11 cg Exp $'
+    ^ '$Id: Tools__NewSystemBrowser.st,v 1.2051 2014-04-08 15:08:42 stefan Exp $'
 ! !