Get more post-load feedback from metacello for debugging

dupriezt · Nov 28, 2020 · 6f00f55 · 6f00f55
1 parent 8b8bfec
commit 6f00f55
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Metacello-MC/MetacelloVersionLoadDirective.class.st b/src/Metacello-MC/MetacelloVersionLoadDirective.class.st
@@ -83,6 +83,7 @@ MetacelloVersionLoadDirective >> loadPostloadDirective: aPostloadDirective [
 	| block |
 	(block :=  aPostloadDirective spec postLoadDoItBlock) ~~ nil
 		ifTrue: [
+			MetacelloNotification signal: ('Evaluating -> ', aPostloadDirective spec label, ' >> ', aPostloadDirective spec postLoadDoIt value asString).
 			aPostloadDirective evaluateSupplyingAnswers: [ block valueWithPossibleArgs: 
 					(Array 
 						with: aPostloadDirective loader