class: ContextInspectorView
authorClaus Gittinger <cg@exept.de>
Sat, 07 Dec 2013 16:02:10 +0100
changeset 13720 0c9ca76c6f23
parent 13719 ea1577caec72
child 13721 bb144df4cfec
class: ContextInspectorView changed: #namesOfBlockContext:
ContextInspectorView.st
--- a/ContextInspectorView.st	Sat Dec 07 12:22:30 2013 +0100
+++ b/ContextInspectorView.st	Sat Dec 07 16:02:10 2013 +0100
@@ -301,7 +301,7 @@
     numArgs := aContext numArgs.
     numVars := aContext numVars.
 
-    (numArgs > 0 or:[numVars > 0]) ifTrue:[
+    (numArgs + numVars) > 0 ifTrue:[
         argAndVarNames := aContext argAndVarNames.
         argAndVarNames notEmptyOrNil ifTrue:[
             argNames := argAndVarNames copyTo:numArgs.
@@ -678,10 +678,10 @@
 !ContextInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.89 2013-09-01 09:00:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.90 2013-12-07 15:02:10 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.89 2013-09-01 09:00:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.90 2013-12-07 15:02:10 cg Exp $'
 ! !