Merge pull request #110 from ba-st/localization_support

Localization support
ba-st · Aug 23, 2024 · 46972d7 · 46972d7
2 parents 43141db + e5cc46c
commit 46972d7
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 9 deletions.
diff --git a/source/Sagan-Core/CriteriaBasedConflictCheckingStrategy.class.st b/source/Sagan-Core/CriteriaBasedConflictCheckingStrategy.class.st
@@ -23,11 +23,8 @@ Class {
 { #category : 'instance creation' }
 CriteriaBasedConflictCheckingStrategy class >> accordingTo: aBlockOrMatchingCriteria [
 
-	^ self
-		  accordingTo: aBlockOrMatchingCriteria
-		  explainingConflictWith: [ :objectInMemory | 
-			  'Something is in conflict with <1p>' expandMacrosWith:
-				  objectInMemory ]
+  ^ self accordingTo: aBlockOrMatchingCriteria explainingConflictWith: [ :objectInMemory |
+        'Something is in conflict with {1}' localizedWithAll: { objectInMemory printString } ]
 ]
 
 { #category : 'instance creation' }

diff --git a/source/Sagan-Core/RepositoryBehavior.class.st b/source/Sagan-Core/RepositoryBehavior.class.st
@@ -43,10 +43,13 @@ RepositoryBehavior >> assertBoundariesAreValidFrom: aStartingPosition upTo: aMax
 { #category : 'private - preconditions' }
 RepositoryBehavior >> assertIncludes: inMemoryObject [
 
-	AssertionChecker
-		enforce: [ ( self countMatching: [ :objectInRepository :criteria | criteria does: objectInRepository equal: inMemoryObject ] ) strictlyPositive ]
-		because: [ '<1p> was not found.' expandMacrosWith: inMemoryObject ]
-		raising: ObjectNotFound
+  AssertionChecker
+    enforce: [
+        ( self countMatching: [ :objectInRepository :criteria |
+              criteria does: objectInRepository equal: inMemoryObject ] ) strictlyPositive
+      ]
+    because: [ '{1} was not found.' localizedWithAll: { inMemoryObject printString } ]
+    raising: ObjectNotFound
 ]
 
 { #category : 'private - preconditions' }