🔧 update assertion log name on ZnEventToLogRecordControllerTest

ba-st · Jun 28, 2024 · 309589c · 309589c
1 parent abb6edc
commit 309589c
Show file tree

Hide file tree

Showing 23 changed files with 228 additions and 267 deletions.
diff --git a/source/Hyperspace-Model-Tests/AbstractCURIETest.class.st b/source/Hyperspace-Model-Tests/AbstractCURIETest.class.st
@@ -2,25 +2,24 @@
 An AbstractCURIETest is a test class for testing the behavior of AbstractCURIE
 "
 Class {
-	#name : 'AbstractCURIETest',
-	#superclass : 'TestCase',
-	#category : 'Hyperspace-Model-Tests',
-	#package : 'Hyperspace-Model-Tests'
+	#name : #AbstractCURIETest,
+	#superclass : #TestCase,
+	#category : 'Hyperspace-Model-Tests'
 }
 
-{ #category : 'testing' }
+{ #category : #testing }
 AbstractCURIETest class >> isAbstract [
 
   ^ self = AbstractCURIETest
 ]
 
-{ #category : 'private' }
+{ #category : #private }
 AbstractCURIETest >> curieClass [
 
   ^ self subclassResponsibility
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testAccessing [
 
   | curie |
@@ -38,15 +37,15 @@ AbstractCURIETest >> testAccessing [
     assertUrl: curie relativeReference equals: 'Person#legal' asUrl
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testAsWebLink [
 
   | curie |
   curie := self curieClass prefixedBy: 'users' referencing: 'octocat' asUrl.
   self assert: curie asWebLink equals: ( WebLink to: curie )
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testCantCreateWithAbsoluteReference [
 
   self
@@ -55,7 +54,7 @@ AbstractCURIETest >> testCantCreateWithAbsoluteReference [
     withMessageText: 'https://google.com/ must be a relative reference'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testCantCreateWithEmptyPrefix [
 
   self
@@ -64,7 +63,7 @@ AbstractCURIETest >> testCantCreateWithEmptyPrefix [
     withMessageText: 'A CURIE prefix cannot be empty'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testCantExpandToURIInContext [
 
   | curie |
@@ -76,7 +75,7 @@ AbstractCURIETest >> testCantExpandToURIInContext [
     withMessageText: 'Missing namespace "users"'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testCantExpandToURIInContextRecursiverly [
 
   | userCurie usersCurie context |
@@ -91,7 +90,7 @@ AbstractCURIETest >> testCantExpandToURIInContextRecursiverly [
     withMessageText: 'Missing namespace "api"'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testComparing [
 
   | curie |
@@ -107,7 +106,7 @@ AbstractCURIETest >> testComparing [
     deny: curie equals: ( self curieClass prefixedBy: 'orgs' referencing: 'octocat' asUrl )
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testExpandToURIInContext [
 
   | curie context |
@@ -120,7 +119,7 @@ AbstractCURIETest >> testExpandToURIInContext [
     equals: 'https://api.github.com/users/octocat' asUrl
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 AbstractCURIETest >> testExpandToURIInContextRecursively [
 
   | usersCurie userCurie context |

diff --git a/source/Hyperspace-Model-Tests/CURIETest.class.st b/source/Hyperspace-Model-Tests/CURIETest.class.st
@@ -2,27 +2,26 @@
 A CompactURITest is a test class for testing the behavior of CompactURI
 "
 Class {
-	#name : 'CURIETest',
-	#superclass : 'AbstractCURIETest',
-	#category : 'Hyperspace-Model-Tests',
-	#package : 'Hyperspace-Model-Tests'
+	#name : #CURIETest,
+	#superclass : #AbstractCURIETest,
+	#category : 'Hyperspace-Model-Tests'
 }
 
-{ #category : 'private' }
+{ #category : #private }
 CURIETest >> curieClass [
 
   ^ CURIE
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 CURIETest >> testAsSafeCURIE [
 
   self
     assert: ( self curieClass fromString: 'users:octocat' ) asSafeCURIE printString
     equals: '[users:octocat]'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 CURIETest >> testFromString [
 
   | curie |
@@ -33,7 +32,7 @@ CURIETest >> testFromString [
     assertUrl: curie relativeReference equals: 'octocat' asUrl / 'tokens'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 CURIETest >> testParsingErrors [
 
   self
@@ -51,7 +50,7 @@ CURIETest >> testParsingErrors [
     withMessageText: 'Cannot create a CURIE from "users"'
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 CURIETest >> testPrinting [
 
   | curie curieWithPath curieWithFragment |

diff --git a/source/Hyperspace-Model-Tests/EntityTagTest.class.st b/source/Hyperspace-Model-Tests/EntityTagTest.class.st
@@ -2,29 +2,27 @@
 I'm a test case for EntityTag
 "
 Class {
-	#name : 'EntityTagTest',
-	#superclass : 'TestCase',
-	#category : 'Hyperspace-Model-Tests-IETF',
-	#package : 'Hyperspace-Model-Tests',
-	#tag : 'IETF'
+	#name : #EntityTagTest,
+	#superclass : #TestCase,
+	#category : 'Hyperspace-Model-Tests-IETF'
 }
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testAsEntityTag [
 
 	self
 		assert: '"12345"' asEntityTag equals: (EntityTag fromString: '"12345"');
 		assert: (EntityTag fromString: '"12345"') asEntityTag equals: (EntityTag fromString: '"12345"')
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testAsString [ 
 
 	self 	assert: (EntityTag with: '12345') asString equals: '"12345"'.
 	self 	assert: (EntityTag weakWith: '12345') asString equals: 'W/"12345"'.
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testCaseSensitiveWeakEntityTagCreation [
 
 	self
@@ -33,7 +31,7 @@ EntityTagTest >> testCaseSensitiveWeakEntityTagCreation [
 			raise: InstanceCreationFailed
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testFromString [
 
 	self
@@ -51,7 +49,7 @@ EntityTagTest >> testFromString [
 		should: [ EntityTag fromString: 'w/"1"' ] raise: InstanceCreationFailed
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testHash [
 
 	self
@@ -62,7 +60,7 @@ EntityTagTest >> testHash [
 		equals: (EntityTag fromString: 'W/"12345"') hash
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 EntityTagTest >> testPrinting [
 
 	self assert: (EntityTag with: '12345') printString equals: '"12345"'.

diff --git a/source/Hyperspace-Model-Tests/HTTPClientErrorTest.class.st b/source/Hyperspace-Model-Tests/HTTPClientErrorTest.class.st
@@ -2,14 +2,12 @@
 A HTTPClientErrorTest is a test class for testing the behavior of HTTPClientError
 "
 Class {
-	#name : 'HTTPClientErrorTest',
-	#superclass : 'TestCase',
-	#category : 'Hyperspace-Model-Tests-Exceptions',
-	#package : 'Hyperspace-Model-Tests',
-	#tag : 'Exceptions'
+	#name : #HTTPClientErrorTest,
+	#superclass : #TestCase,
+	#category : 'Hyperspace-Model-Tests-Exceptions'
 }
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testBadRequest [
 
 	self
@@ -23,7 +21,7 @@ HTTPClientErrorTest >> testBadRequest [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testConflict [
 
 	self
@@ -37,7 +35,7 @@ HTTPClientErrorTest >> testConflict [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testConvenienceHandler [
 
 	self
@@ -50,7 +48,7 @@ HTTPClientErrorTest >> testConvenienceHandler [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testConvenienceHandlerUsingAnotherSignal [
 
 	self
@@ -66,7 +64,7 @@ HTTPClientErrorTest >> testConvenienceHandlerUsingAnotherSignal [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testConvenienceHandlerWithOnExceptDo [
 
 	self
@@ -83,7 +81,7 @@ HTTPClientErrorTest >> testConvenienceHandlerWithOnExceptDo [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testNotFound [
 
 	self
@@ -106,7 +104,7 @@ HTTPClientErrorTest >> testNotFound [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testPreconditionFailed [
 
 	self
@@ -120,7 +118,7 @@ HTTPClientErrorTest >> testPreconditionFailed [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testPreconditionRequired [
 
 	self
@@ -134,7 +132,7 @@ HTTPClientErrorTest >> testPreconditionRequired [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testSignalingCustomCode [
 
 	self
@@ -153,7 +151,7 @@ HTTPClientErrorTest >> testSignalingCustomCode [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testTooManyRequests [
 
 	self
@@ -167,7 +165,7 @@ HTTPClientErrorTest >> testTooManyRequests [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testUnprocessableEntity [
 
 	self
@@ -181,7 +179,7 @@ HTTPClientErrorTest >> testUnprocessableEntity [
 			]
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPClientErrorTest >> testUnsupportedMediaType [
 
 	self

diff --git a/source/Hyperspace-Model-Tests/HTTPErrorTest.class.st b/source/Hyperspace-Model-Tests/HTTPErrorTest.class.st
@@ -2,14 +2,12 @@
 A HTTPErrorTest is a test class for testing the behavior of HTTPError
 "
 Class {
-	#name : 'HTTPErrorTest',
-	#superclass : 'TestCase',
-	#category : 'Hyperspace-Model-Tests-Exceptions',
-	#package : 'Hyperspace-Model-Tests',
-	#tag : 'Exceptions'
+	#name : #HTTPErrorTest,
+	#superclass : #TestCase,
+	#category : 'Hyperspace-Model-Tests-Exceptions'
 }
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPErrorTest >> testHandlingExceptionSelectorSets [
 
 	self
@@ -26,13 +24,13 @@ HTTPErrorTest >> testHandlingExceptionSelectorSets [
 		raise: HTTPServerError serviceUnavailable
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPErrorTest >> testHandlingHTTPClientError [
 
 	self should: [ HTTPClientError notFound signal ] raise: HTTPError
 ]
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPErrorTest >> testHandlingHTTPServerError [
 
 	self should: [ HTTPServerError internalServerError signal ] raise: HTTPError

diff --git a/source/Hyperspace-Model-Tests/HTTPNotAcceptableTest.class.st b/source/Hyperspace-Model-Tests/HTTPNotAcceptableTest.class.st
@@ -1,12 +1,10 @@
 Class {
-	#name : 'HTTPNotAcceptableTest',
-	#superclass : 'TestCase',
-	#category : 'Hyperspace-Model-Tests-Exceptions',
-	#package : 'Hyperspace-Model-Tests',
-	#tag : 'Exceptions'
+	#name : #HTTPNotAcceptableTest,
+	#superclass : #TestCase,
+	#category : 'Hyperspace-Model-Tests-Exceptions'
 }
 
-{ #category : 'tests' }
+{ #category : #tests }
 HTTPNotAcceptableTest >> testSignaling [
 
 	self