--- a/ContextInspectorView.st Tue May 28 22:46:27 2013 +0100
+++ b/ContextInspectorView.st Fri May 31 00:35:44 2013 +0100
@@ -51,7 +51,6 @@
"
! !
-
!ContextInspectorView methodsFor:'accessing'!
inspect:aContext
@@ -267,10 +266,12 @@
"/ hidden temps used for loop.
"/
blockNode invocationSelector == #timesRepeat ifTrue:[
- realTempNames asOrderedCollection addFirst:'*loopStop*'
+ realTempNames := realTempNames asOrderedCollection.
+ realTempNames addFirst:'*loopStop*'
] ifFalse:[
blockNode invocationSelector == #to:do: ifTrue:[
- realTempNames asOrderedCollection addFirst:'*loopStop*'
+ realTempNames := realTempNames asOrderedCollection.
+ realTempNames addFirst:'*loopStop*'
]
].
blockNode := blockNode home.
@@ -370,7 +371,6 @@
"Modified: 14.12.1995 / 21:49:43 / cg"
! !
-
!ContextInspectorView methodsFor:'initialization'!
initialize
@@ -379,7 +379,6 @@
! !
-
!ContextInspectorView methodsFor:'menu'!
fieldMenu
@@ -460,7 +459,6 @@
"Modified: / 20-07-2012 / 10:51:12 / cg"
! !
-
!ContextInspectorView methodsFor:'private'!
defaultLabel
@@ -630,11 +628,8 @@
"Created: / 31.10.2001 / 09:17:45 / cg"
! !
-
!ContextInspectorView methodsFor:'user actions'!
-
-
hideTemporaries
"do not show contexts temporaries"
@@ -672,15 +667,14 @@
inspectedContext at:contextIndex put:newValue.
! !
-
!ContextInspectorView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.80 2013-03-11 16:58:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.81 2013-05-28 18:23:50 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.80 2013-03-11 16:58:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.81 2013-05-28 18:23:50 cg Exp $'
!
version_HG