Fix merge

pharo-spec · Nov 27, 2023 · 06d89c9 · 06d89c9
1 parent 359307f
commit 06d89c9
Showing 1 changed file with 6 additions and 5 deletions.
diff --git a/src/NewTools-Debugger/StDebugger.class.st b/src/NewTools-Debugger/StDebugger.class.st
@@ -93,7 +93,7 @@ Class {
 		'EnableStackColoring',
 		'FastTDD'
 	],
-	#category : 'NewTools-Debugger-View'
+	#category : #'NewTools-Debugger-View'
 }
 
 { #category : #commands }
@@ -755,7 +755,7 @@ StDebugger >> initializeShortcuts: aWindowPresenter [
 		toAction: [ self restartCurrentContext ]
 ]
 
-{ #category : #initialization }
+{ #category : #stack }
 StDebugger >> initializeStack [
 
 	stackTable := self newTable.
@@ -770,14 +770,15 @@ StDebugger >> initializeStack [
 				 sortFunction: nil;
 				 yourself);
 		addColumn:
-			((SpStringTableColumn title: 'Method' evaluated: [ :item |
+			((SpStringTableColumn title: 'Method' evaluated: [ :context |
 					  | method |
-					  method := item method.
-					  (self printReceiverClassInContext: item) , '>>'
+					  method := context method.
+					  (self printReceiverClassInContext: context) , '>>'
 					  , (method isCompiledBlock
 							   ifTrue: [ method sourceNode sourceCode ]
 							   ifFalse: [ method selector ]) ])
 				 sortFunction: nil;
+				displayColor: [ :context | self stackColorForContext: context ];
 				 yourself).
 	stackTable transmitDo: [ :context |
 		stackTable selection isEmpty ifFalse: [