diff --git a/src/Bloc-Alexandrie-Tests/BlCompositeBackgroundTest.extension.st b/src/Bloc-Alexandrie-Tests/BlCompositeBackgroundTest.extension.st index f2256349f..3677ecc13 100644 --- a/src/Bloc-Alexandrie-Tests/BlCompositeBackgroundTest.extension.st +++ b/src/Bloc-Alexandrie-Tests/BlCompositeBackgroundTest.extension.st @@ -4,11 +4,11 @@ Extension { #name : #BlCompositeBackgroundTest } BlCompositeBackgroundTest >> testAeApplyTo [ | space background blElement backgroundList | - space := BlOSpace new. + space := BlSpace new. backgroundList := OrderedCollection with: (BlBackground paint: Color blue). background := BlCompositeBackground withAll: backgroundList. - blElement := BlElement new background: background. + blElement := BlElement new background: background; yourself. space root addChild: blElement. space aeAsForm. "check no errors" diff --git a/src/Bloc-Alexandrie-Tests/BlSpaceBuilder.class.st b/src/Bloc-Alexandrie-Tests/BlSpaceBuilder.class.st index 3b0cde94f..e191d6ec3 100644 --- a/src/Bloc-Alexandrie-Tests/BlSpaceBuilder.class.st +++ b/src/Bloc-Alexandrie-Tests/BlSpaceBuilder.class.st @@ -135,12 +135,18 @@ BlSpaceBuilder >> initialize [ super initialize. - space := BlOSpace new. + space := BlSpace new. spaceExtent := 100 asPoint. host := BlOSWindowSDL2Host new. random := Random seed: 7. - alphabetGenerator := Generator on: [ :generator | + alphabetGenerator := self newAlphabetGenerator +] + +{ #category : #initialization } +BlSpaceBuilder >> newAlphabetGenerator [ + + ^ Generator on: [ :generator | | index | index := 1. [ Character alphabet do: [ :each | @@ -150,8 +156,7 @@ BlSpaceBuilder >> initialize [ ifTrue: [ '' ] ifFalse: [ index asString ]. generator yield: next, suffix ]. - index := index + 1 ] repeat ]. - + index := index + 1 ] repeat ] ] { #category : #'instance creation' } diff --git a/src/Bloc-Alexandrie/BAAxisAlignedCompositionLayer.class.st b/src/Bloc-Alexandrie/BAAxisAlignedCompositionLayer.class.st index 070295248..86ce0ceb9 100644 --- a/src/Bloc-Alexandrie/BAAxisAlignedCompositionLayer.class.st +++ b/src/Bloc-Alexandrie/BAAxisAlignedCompositionLayer.class.st @@ -18,7 +18,8 @@ Class { 'element', 'pattern' ], - #category : 'Bloc-Alexandrie-Utility', + #package : 'Bloc', + #tag : 'Alexandrie-Utility', #package : 'Bloc-Alexandrie', #tag : 'Utility' } diff --git a/src/Bloc-Alexandrie/BABufferSpaceRenderer.class.st b/src/Bloc-Alexandrie/BABufferSpaceRenderer.class.st index 2437b07fc..bbb23423b 100644 --- a/src/Bloc-Alexandrie/BABufferSpaceRenderer.class.st +++ b/src/Bloc-Alexandrie/BABufferSpaceRenderer.class.st @@ -1,7 +1,8 @@ Class { #name : 'BABufferSpaceRenderer', #superclass : 'BASpaceRenderer', - #category : 'Bloc-Alexandrie-Renderer', + #package : 'Bloc', + #tag : 'Alexandrie-Renderer', #package : 'Bloc-Alexandrie', #tag : 'Renderer' } diff --git a/src/Bloc-Alexandrie/BACanvasTextMeasurer.class.st b/src/Bloc-Alexandrie/BACanvasTextMeasurer.class.st index 37ed851d3..37431872d 100644 --- a/src/Bloc-Alexandrie/BACanvasTextMeasurer.class.st +++ b/src/Bloc-Alexandrie/BACanvasTextMeasurer.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'aeCanvas' ], - #category : 'Bloc-Alexandrie-Text', + #package : 'Bloc', + #tag : 'Alexandrie-Text', #package : 'Bloc-Alexandrie', #tag : 'Text' } diff --git a/src/Bloc-Alexandrie/BAFontConverter.class.st b/src/Bloc-Alexandrie/BAFontConverter.class.st index 623bea782..2a2ed5c84 100644 --- a/src/Bloc-Alexandrie/BAFontConverter.class.st +++ b/src/Bloc-Alexandrie/BAFontConverter.class.st @@ -9,7 +9,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Alexandrie-Fonts', + #package : 'Bloc', + #tag : 'Alexandrie-Fonts', #package : 'Bloc-Alexandrie', #tag : 'Fonts' } diff --git a/src/Bloc-Alexandrie/BAFormSpaceRenderer.class.st b/src/Bloc-Alexandrie/BAFormSpaceRenderer.class.st index bf1971854..2d378170c 100644 --- a/src/Bloc-Alexandrie/BAFormSpaceRenderer.class.st +++ b/src/Bloc-Alexandrie/BAFormSpaceRenderer.class.st @@ -1,7 +1,8 @@ Class { #name : 'BAFormSpaceRenderer', #superclass : 'BASpaceRenderer', - #category : 'Bloc-Alexandrie-Renderer', + #package : 'Bloc', + #tag : 'Alexandrie-Renderer', #package : 'Bloc-Alexandrie', #tag : 'Renderer' } diff --git a/src/Bloc-Alexandrie/BAMockedTextMeasurer.class.st b/src/Bloc-Alexandrie/BAMockedTextMeasurer.class.st index 865eb53cf..7f61b8cc0 100644 --- a/src/Bloc-Alexandrie/BAMockedTextMeasurer.class.st +++ b/src/Bloc-Alexandrie/BAMockedTextMeasurer.class.st @@ -10,7 +10,8 @@ Class { 'measuredHeight', 'textOffset' ], - #category : 'Bloc-Alexandrie-Text-Mocked', + #package : 'Bloc', + #tag : 'Alexandrie-Text-Mocked', #package : 'Bloc-Alexandrie', #tag : 'Text-Mocked' } diff --git a/src/Bloc-Alexandrie/BAMockedTextParagraphSpan.class.st b/src/Bloc-Alexandrie/BAMockedTextParagraphSpan.class.st index 7689d18bf..948f77a27 100644 --- a/src/Bloc-Alexandrie/BAMockedTextParagraphSpan.class.st +++ b/src/Bloc-Alexandrie/BAMockedTextParagraphSpan.class.st @@ -1,7 +1,8 @@ Class { #name : 'BAMockedTextParagraphSpan', #superclass : 'BATextParagraphLeaf', - #category : 'Bloc-Alexandrie-Text-Mocked', + #package : 'Bloc', + #tag : 'Alexandrie-Text-Mocked', #package : 'Bloc-Alexandrie', #tag : 'Text-Mocked' } diff --git a/src/Bloc-Alexandrie/BAOffscreen.class.st b/src/Bloc-Alexandrie/BAOffscreen.class.st index d7d9b2e28..81824ea75 100644 --- a/src/Bloc-Alexandrie/BAOffscreen.class.st +++ b/src/Bloc-Alexandrie/BAOffscreen.class.st @@ -13,7 +13,8 @@ Class { #classInstVars : [ 'instance' ], - #category : 'Bloc-Alexandrie-Utility', + #package : 'Bloc', + #tag : 'Alexandrie-Utility', #package : 'Bloc-Alexandrie', #tag : 'Utility' } diff --git a/src/Bloc-Alexandrie/BARenderer.class.st b/src/Bloc-Alexandrie/BARenderer.class.st index 3c2153007..99a62dad4 100644 --- a/src/Bloc-Alexandrie/BARenderer.class.st +++ b/src/Bloc-Alexandrie/BARenderer.class.st @@ -6,7 +6,8 @@ Both buffer and form host-spaces are supported. Class { #name : 'BARenderer', #superclass : 'BlHostRenderer', - #category : 'Bloc-Alexandrie-Renderer', + #package : 'Bloc', + #tag : 'Alexandrie-Renderer', #package : 'Bloc-Alexandrie', #tag : 'Renderer' } diff --git a/src/Bloc-Alexandrie/BASpaceRenderer.class.st b/src/Bloc-Alexandrie/BASpaceRenderer.class.st index 467226d8e..54b5e5b94 100644 --- a/src/Bloc-Alexandrie/BASpaceRenderer.class.st +++ b/src/Bloc-Alexandrie/BASpaceRenderer.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'aeCanvas' ], - #category : 'Bloc-Alexandrie-Renderer', + #package : 'Bloc', + #tag : 'Alexandrie-Renderer', #package : 'Bloc-Alexandrie', #tag : 'Renderer' } diff --git a/src/Bloc-Alexandrie/BASpaceTextMeasurer.class.st b/src/Bloc-Alexandrie/BASpaceTextMeasurer.class.st index 4bea3fbc8..347b9d740 100644 --- a/src/Bloc-Alexandrie/BASpaceTextMeasurer.class.st +++ b/src/Bloc-Alexandrie/BASpaceTextMeasurer.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'spaceRenderer' ], - #category : 'Bloc-Alexandrie-Text', + #package : 'Bloc', + #tag : 'Alexandrie-Text', #package : 'Bloc-Alexandrie', #tag : 'Text' } diff --git a/src/Bloc-Alexandrie/BATextElementMockedMeasurer.class.st b/src/Bloc-Alexandrie/BATextElementMockedMeasurer.class.st index 7112aaffb..60b16a4c2 100644 --- a/src/Bloc-Alexandrie/BATextElementMockedMeasurer.class.st +++ b/src/Bloc-Alexandrie/BATextElementMockedMeasurer.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'measurer' ], - #category : 'Bloc-Alexandrie-Text-Mocked', + #package : 'Bloc', + #tag : 'Alexandrie-Text-Mocked', #package : 'Bloc-Alexandrie', #tag : 'Text-Mocked' } diff --git a/src/Bloc-Alexandrie/BATextMeasurer.class.st b/src/Bloc-Alexandrie/BATextMeasurer.class.st index 829160c15..3113da363 100644 --- a/src/Bloc-Alexandrie/BATextMeasurer.class.st +++ b/src/Bloc-Alexandrie/BATextMeasurer.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'lineAdvance' ], - #category : 'Bloc-Alexandrie-Text', + #package : 'Bloc', + #tag : 'Alexandrie-Text', #package : 'Bloc-Alexandrie', #tag : 'Text' } diff --git a/src/Bloc-Alexandrie/BATextParagraphLeaf.class.st b/src/Bloc-Alexandrie/BATextParagraphLeaf.class.st index cbdf33968..88aa016af 100644 --- a/src/Bloc-Alexandrie/BATextParagraphLeaf.class.st +++ b/src/Bloc-Alexandrie/BATextParagraphLeaf.class.st @@ -8,7 +8,8 @@ Class { #classVars : [ 'TabStopWidth' ], - #category : 'Bloc-Alexandrie-Text', + #package : 'Bloc', + #tag : 'Alexandrie-Text', #package : 'Bloc-Alexandrie', #tag : 'Text' } diff --git a/src/Bloc-Alexandrie/BATextParagraphSpan.class.st b/src/Bloc-Alexandrie/BATextParagraphSpan.class.st index 8f2214a5a..0a502b735 100644 --- a/src/Bloc-Alexandrie/BATextParagraphSpan.class.st +++ b/src/Bloc-Alexandrie/BATextParagraphSpan.class.st @@ -4,7 +4,8 @@ I represent an Alexandrie specific measured span Class { #name : 'BATextParagraphSpan', #superclass : 'BATextParagraphLeaf', - #category : 'Bloc-Alexandrie-Text', + #package : 'Bloc', + #tag : 'Alexandrie-Text', #package : 'Bloc-Alexandrie', #tag : 'Text' } diff --git a/src/Bloc-DevTool/BlDevHalosEventListenerExample.class.st b/src/Bloc-DevTool/BlDevHalosEventListenerExample.class.st index 0fdd4045b..3b336c5a6 100644 --- a/src/Bloc-DevTool/BlDevHalosEventListenerExample.class.st +++ b/src/Bloc-DevTool/BlDevHalosEventListenerExample.class.st @@ -25,7 +25,7 @@ BlDevHalosEventListenerExample >> activatedHalos [ anEvent modifiers alt: true; shift: true. - BlOSpace simulateEvent: anEvent on: (aContainer childAt: 1). + BlSpace simulateEvent: anEvent on: (aContainer childAt: 1). theNewElements := aSpace children asArray. "self assert: theNewElements size equals: thePriorElements size + 1." @@ -86,7 +86,7 @@ BlDevHalosEventListenerExample >> newSpace [ | aSpace | - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace host: BlHeadlessHost new. aSpace title: 'Async Element Examples'. aSpace extent: 600 @ 400. @@ -96,14 +96,14 @@ BlDevHalosEventListenerExample >> newSpace [ { #category : #utility } BlDevHalosEventListenerExample >> putInSpace: aBlElement [ - + | aSpace | self assert: [ aBlElement isNotNil ] description: [ 'Element must be non-nil' ]. aSpace := self newSpace. - aSpace addChild: aBlElement. + aSpace root addChild: aBlElement. ^ aSpace ] diff --git a/src/Bloc-Examples/BlAnimationExamples.class.st b/src/Bloc-Examples/BlAnimationExamples.class.st index 05f22434a..e8a237dbd 100644 --- a/src/Bloc-Examples/BlAnimationExamples.class.st +++ b/src/Bloc-Examples/BlAnimationExamples.class.st @@ -47,7 +47,7 @@ BlAnimationExamples class >> ballsAnim [ alp }. els add: el ]. - space := BlOSpace new. + space := BlSpace new. space root addChildren: els. space show. @@ -88,7 +88,7 @@ BlAnimationExamples class >> sequential [ position: 100 @ 100. element addAnimation: sequential. - space := BlOSpace new. + space := BlSpace new. space root addChild: element. space show ] diff --git a/src/Bloc-Examples/BlErrorHandlingExamples.class.st b/src/Bloc-Examples/BlErrorHandlingExamples.class.st index 9b85004ff..d81c9eb95 100644 --- a/src/Bloc-Examples/BlErrorHandlingExamples.class.st +++ b/src/Bloc-Examples/BlErrorHandlingExamples.class.st @@ -114,9 +114,9 @@ BlErrorHandlingExamples >> sceneWith: aFaultyElement [ aContainer addChildren: { aLeftChild . aRightChild }. - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace host: BlMorphicWindowHost new. - aSpace addChild: aContainer. + aSpace root addChild: aContainer. aSpace show. aSpace pulse. aSpace close. diff --git a/src/Bloc-Examples/BlMouseProcessorExamples.class.st b/src/Bloc-Examples/BlMouseProcessorExamples.class.st index b5b83681a..870b81d7a 100644 --- a/src/Bloc-Examples/BlMouseProcessorExamples.class.st +++ b/src/Bloc-Examples/BlMouseProcessorExamples.class.st @@ -58,7 +58,7 @@ BlMouseProcessorExamples >> mouseProcessor [ | aMouseProcessor aSpace | - aSpace := BlOSpace new. + aSpace := BlSpace new. aMouseProcessor := BlMouseProcessor space: aSpace. self assert: aMouseProcessor space equals: aSpace. diff --git a/src/Bloc-Examples/BlSharedEventDistributorExamples.class.st b/src/Bloc-Examples/BlSharedEventDistributorExamples.class.st index 8c9413560..ce0aa60ad 100644 --- a/src/Bloc-Examples/BlSharedEventDistributorExamples.class.st +++ b/src/Bloc-Examples/BlSharedEventDistributorExamples.class.st @@ -94,7 +94,7 @@ BlSharedEventDistributorExamples >> mouseEnterEventOneOutOfTwoElements [ anElementOne when: BlMouseEnterEvent do: [ aMouseEnterOne := aMouseEnterOne + 1 ]. anElementTwo when: BlMouseEnterEvent do: [ aMouseEnterTwo := aMouseEnterTwo + 1 ]. - BlOSpace simulateMouseMoveInside: anElementOne. + BlSpace simulateMouseMoveInside: anElementOne. self assert: aMouseEnterOne equals: 1. self assert: aMouseEnterTwo equals: 1. @@ -105,6 +105,7 @@ BlSharedEventDistributorExamples >> mouseEnterEventOneOutOfTwoElements [ { #category : #'examples - sharing events' } BlSharedEventDistributorExamples >> mouseLeaveEventOneOutOfTwoElements [ + | aHandler anElements aContainer aMouseLeaveTwo aMouseLeaveOne anElementOne anElementTwo | aMouseLeaveOne := aMouseLeaveTwo := 0. aHandler := self installTwoElements. @@ -118,10 +119,16 @@ BlSharedEventDistributorExamples >> mouseLeaveEventOneOutOfTwoElements [ anElementOne when: BlMouseLeaveEvent do: [ aMouseLeaveOne := aMouseLeaveOne + 1 ]. anElementTwo when: BlMouseLeaveEvent do: [ aMouseLeaveTwo := aMouseLeaveTwo + 1 ]. - BlOSpace + BlSpace simulateEvents: { - BlMouseMoveEvent new position: (BlOSpace locationInside: anElementOne); screenPosition: 0@0. - BlMouseMoveEvent new position: (BlOSpace locationOutside: aContainer); screenPosition: 0@0 } + BlMouseMoveEvent new + position: (BlSpace locationInside: anElementOne); + screenPosition: 0@0; + yourself. + BlMouseMoveEvent new + position: (BlSpace locationOutside: aContainer); + screenPosition: 0@0; + yourself } on: aContainer. self assert: aMouseLeaveOne equals: 1. diff --git a/src/Bloc-Examples/BlSpaceEventExamples.class.st b/src/Bloc-Examples/BlSpaceEventExamples.class.st index 3e611687d..109dac1b1 100644 --- a/src/Bloc-Examples/BlSpaceEventExamples.class.st +++ b/src/Bloc-Examples/BlSpaceEventExamples.class.st @@ -28,8 +28,10 @@ BlSpaceEventExamples >> ignoreSpaceEventsAfterCloseRequest [ { #category : #'instance creation' } BlSpaceEventExamples >> space [ - - ^ BlOSpace new host: BlHeadlessHost new + + ^ BlSpace new + host: BlHeadlessHost new; + yourself ] { #category : #'show / close' } diff --git a/src/Bloc-Examples/BlTaskTest.class.st b/src/Bloc-Examples/BlTaskTest.class.st index 81d20e8b4..187be6360 100644 --- a/src/Bloc-Examples/BlTaskTest.class.st +++ b/src/Bloc-Examples/BlTaskTest.class.st @@ -14,7 +14,7 @@ BlTaskTest >> testAddElementWithTaskToSpace [ | anElement aSpace aTask | anElement := self testAddTaskToTheElementWithoutSpace. - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace root addChild: anElement. "task were moved to the space" self assert: anElement taskQueue tasks isEmpty. diff --git a/src/Bloc-Examples/TBlExample.trait.st b/src/Bloc-Examples/TBlExample.trait.st index 08ceff295..f4eceeb92 100644 --- a/src/Bloc-Examples/TBlExample.trait.st +++ b/src/Bloc-Examples/TBlExample.trait.st @@ -9,10 +9,12 @@ Trait { { #category : #opening } TBlExample classSide >> openInWindow: anElement named: aTitleString extent: aPoint [ "Open a given element in a window of a provided extent and specified title" + | aSpace | - aSpace := BlOSpace new + aSpace := BlSpace new extent: aPoint; - title: aTitleString. + title: aTitleString; + yourself. aSpace root background: self spaceBackground. aSpace root addChild: anElement. diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalExactResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalExactResizerState.class.st index db1b43041..8876a96dc 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalExactResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalExactResizerState.class.st @@ -1,6 +1,7 @@ Class { #name : 'BlLayoutHorizontalExactResizerState', #superclass : 'BlLayoutHorizontalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentLimitedResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentLimitedResizerState.class.st index e12bb6657..aedc3dd41 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentLimitedResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentLimitedResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutHorizontalFitContentLimitedResizerState', #superclass : 'BlLayoutHorizontalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentResizerState.class.st index 24a08968c..61789ba93 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalFitContentResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutHorizontalFitContentResizerState', #superclass : 'BlLayoutHorizontalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalLocalResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalLocalResizerState.class.st index 9ef26a7ad..957407d43 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalLocalResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalLocalResizerState.class.st @@ -1,6 +1,7 @@ Class { #name : 'BlLayoutHorizontalLocalResizerState', #superclass : 'BlLayoutHorizontalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalMatchParentResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalMatchParentResizerState.class.st index d819b6fad..c5b971b1e 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalMatchParentResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalMatchParentResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutHorizontalMatchParentResizerState', #superclass : 'BlLayoutHorizontalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutHorizontalResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutHorizontalResizerState.class.st index 586ea9fba..ca9c8a64b 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutHorizontalResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutHorizontalResizerState.class.st @@ -4,7 +4,8 @@ Class { #classInstVars : [ 'any' ], - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutResizerState.class.st index e9f1800aa..8469b8e23 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutResizerState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalExactResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalExactResizerState.class.st index ae9e156a7..e9c817669 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalExactResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalExactResizerState.class.st @@ -1,6 +1,7 @@ Class { #name : 'BlLayoutVerticalExactResizerState', #superclass : 'BlLayoutVerticalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentLimitedResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentLimitedResizerState.class.st index a876459b6..be8628a06 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentLimitedResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentLimitedResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutVerticalFitContentLimitedResizerState', #superclass : 'BlLayoutVerticalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentResizerState.class.st index 0ed82a2f8..a94285d8d 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalFitContentResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutVerticalFitContentResizerState', #superclass : 'BlLayoutVerticalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalLocalResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalLocalResizerState.class.st index de266bd61..a2ba1c5dc 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalLocalResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalLocalResizerState.class.st @@ -1,6 +1,7 @@ Class { #name : 'BlLayoutVerticalLocalResizerState', #superclass : 'BlLayoutVerticalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalMatchParentResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalMatchParentResizerState.class.st index 2bfd3d6d2..72ea894cc 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalMatchParentResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalMatchParentResizerState.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlLayoutVerticalMatchParentResizerState', #superclass : 'BlLayoutVerticalResizerState', - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Resizer/BlLayoutVerticalResizerState.class.st b/src/Bloc-Layout-Resizer/BlLayoutVerticalResizerState.class.st index 56fda7fbb..c808ffed6 100644 --- a/src/Bloc-Layout-Resizer/BlLayoutVerticalResizerState.class.st +++ b/src/Bloc-Layout-Resizer/BlLayoutVerticalResizerState.class.st @@ -4,7 +4,8 @@ Class { #classInstVars : [ 'any' ], - #category : 'Bloc-Layout-Resizer', + #package : 'Bloc', + #tag : 'Layout-Resizer', #package : 'Bloc-Layout-Resizer' } diff --git a/src/Bloc-Layout-Tests/BlFlowLayoutCompositionSmokeTest.class.st b/src/Bloc-Layout-Tests/BlFlowLayoutCompositionSmokeTest.class.st index f7297daef..d3cb5bec6 100644 --- a/src/Bloc-Layout-Tests/BlFlowLayoutCompositionSmokeTest.class.st +++ b/src/Bloc-Layout-Tests/BlFlowLayoutCompositionSmokeTest.class.st @@ -109,10 +109,10 @@ BlFlowLayoutCompositionSmokeTest class >> exampleText [ { #category : #examples } BlFlowLayoutCompositionSmokeTest class >> floatingCells [ - | aSpace | - aSpace := BlOSpace new. + | aSpace | + aSpace := BlSpace new. aSpace root addChild: self new floatingCells. aSpace root addEventHandler: (BlEventHandler diff --git a/src/Bloc-Layout/BlFlowLayoutChild.class.st b/src/Bloc-Layout/BlFlowLayoutChild.class.st index 6e78e172c..a3e67c031 100644 --- a/src/Bloc-Layout/BlFlowLayoutChild.class.st +++ b/src/Bloc-Layout/BlFlowLayoutChild.class.st @@ -14,7 +14,8 @@ Class { 'measurer', 'display' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #'instance creation' } diff --git a/src/Bloc-Layout/BlFlowLayoutConstraints.class.st b/src/Bloc-Layout/BlFlowLayoutConstraints.class.st index d7d26031a..e2d5dc241 100644 --- a/src/Bloc-Layout/BlFlowLayoutConstraints.class.st +++ b/src/Bloc-Layout/BlFlowLayoutConstraints.class.st @@ -6,7 +6,8 @@ Class { 'weight', 'display' ], - #category : 'Bloc-Layout-Flow' + #package : 'Bloc', + #tag : 'Layout-Flow' } { #category : #accessing } diff --git a/src/Bloc-Layout/BlFlowLayoutConstraintsHorizontal.class.st b/src/Bloc-Layout/BlFlowLayoutConstraintsHorizontal.class.st index a64ee832c..851916586 100644 --- a/src/Bloc-Layout/BlFlowLayoutConstraintsHorizontal.class.st +++ b/src/Bloc-Layout/BlFlowLayoutConstraintsHorizontal.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'alignment' ], - #category : 'Bloc-Layout-Flow' + #package : 'Bloc', + #tag : 'Layout-Flow' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlFlowLayoutConstraintsVertical.class.st b/src/Bloc-Layout/BlFlowLayoutConstraintsVertical.class.st index a269b5abd..d4b682b52 100644 --- a/src/Bloc-Layout/BlFlowLayoutConstraintsVertical.class.st +++ b/src/Bloc-Layout/BlFlowLayoutConstraintsVertical.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'alignment' ], - #category : 'Bloc-Layout-Flow' + #package : 'Bloc', + #tag : 'Layout-Flow' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlFlowLayoutDirection.class.st b/src/Bloc-Layout/BlFlowLayoutDirection.class.st index 418f268c1..4aacf0f4c 100644 --- a/src/Bloc-Layout/BlFlowLayoutDirection.class.st +++ b/src/Bloc-Layout/BlFlowLayoutDirection.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutDirection, #superclass : #Object, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlFlowLayoutDisplay.class.st b/src/Bloc-Layout/BlFlowLayoutDisplay.class.st index 361690e31..50411d0c9 100644 --- a/src/Bloc-Layout/BlFlowLayoutDisplay.class.st +++ b/src/Bloc-Layout/BlFlowLayoutDisplay.class.st @@ -5,7 +5,8 @@ Class { 'float', 'inline' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #factory } diff --git a/src/Bloc-Layout/BlFlowLayoutFloat.class.st b/src/Bloc-Layout/BlFlowLayoutFloat.class.st index 760668115..858810c39 100644 --- a/src/Bloc-Layout/BlFlowLayoutFloat.class.st +++ b/src/Bloc-Layout/BlFlowLayoutFloat.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutFloat, #superclass : #BlFlowLayoutDisplay, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlFlowLayoutFloatingChild.class.st b/src/Bloc-Layout/BlFlowLayoutFloatingChild.class.st index accc6081b..b640e9106 100644 --- a/src/Bloc-Layout/BlFlowLayoutFloatingChild.class.st +++ b/src/Bloc-Layout/BlFlowLayoutFloatingChild.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'lines' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #adding } diff --git a/src/Bloc-Layout/BlFlowLayoutHorizontal.class.st b/src/Bloc-Layout/BlFlowLayoutHorizontal.class.st index c59fba213..a53d57fea 100644 --- a/src/Bloc-Layout/BlFlowLayoutHorizontal.class.st +++ b/src/Bloc-Layout/BlFlowLayoutHorizontal.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutHorizontal, #superclass : #BlFlowLayoutOrientation, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #measuring } diff --git a/src/Bloc-Layout/BlFlowLayoutInline.class.st b/src/Bloc-Layout/BlFlowLayoutInline.class.st index 057502554..8ca0f40c6 100644 --- a/src/Bloc-Layout/BlFlowLayoutInline.class.st +++ b/src/Bloc-Layout/BlFlowLayoutInline.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutInline, #superclass : #BlFlowLayoutDisplay, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlFlowLayoutInlineChild.class.st b/src/Bloc-Layout/BlFlowLayoutInlineChild.class.st index 05e414d5d..da26ed867 100644 --- a/src/Bloc-Layout/BlFlowLayoutInlineChild.class.st +++ b/src/Bloc-Layout/BlFlowLayoutInlineChild.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutInlineChild, #superclass : #BlFlowLayoutChild, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #adding } diff --git a/src/Bloc-Layout/BlFlowLayoutLeftToRight.class.st b/src/Bloc-Layout/BlFlowLayoutLeftToRight.class.st index f1e500977..b6022098f 100644 --- a/src/Bloc-Layout/BlFlowLayoutLeftToRight.class.st +++ b/src/Bloc-Layout/BlFlowLayoutLeftToRight.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutLeftToRight, #superclass : #BlFlowLayoutDirection, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlFlowLayoutLine.class.st b/src/Bloc-Layout/BlFlowLayoutLine.class.st index 5a55602a2..c30def616 100644 --- a/src/Bloc-Layout/BlFlowLayoutLine.class.st +++ b/src/Bloc-Layout/BlFlowLayoutLine.class.st @@ -12,7 +12,8 @@ Class { 'measurer', 'index' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #'instance creation' } diff --git a/src/Bloc-Layout/BlFlowLayoutLineSpace.class.st b/src/Bloc-Layout/BlFlowLayoutLineSpace.class.st index ec406705f..30c4609e9 100644 --- a/src/Bloc-Layout/BlFlowLayoutLineSpace.class.st +++ b/src/Bloc-Layout/BlFlowLayoutLineSpace.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'intervals' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #initialization } diff --git a/src/Bloc-Layout/BlFlowLayoutOrientation.class.st b/src/Bloc-Layout/BlFlowLayoutOrientation.class.st index 50b01324c..2f8db0745 100644 --- a/src/Bloc-Layout/BlFlowLayoutOrientation.class.st +++ b/src/Bloc-Layout/BlFlowLayoutOrientation.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutOrientation, #superclass : #Object, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #measuring } diff --git a/src/Bloc-Layout/BlFlowLayoutPriorityQueueNode.class.st b/src/Bloc-Layout/BlFlowLayoutPriorityQueueNode.class.st index 8d29d3481..c7e213bfe 100644 --- a/src/Bloc-Layout/BlFlowLayoutPriorityQueueNode.class.st +++ b/src/Bloc-Layout/BlFlowLayoutPriorityQueueNode.class.st @@ -7,7 +7,8 @@ Class { 'queueIndex', 'insertionIndex' ], - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #converting } diff --git a/src/Bloc-Layout/BlFlowLayoutRightToLeft.class.st b/src/Bloc-Layout/BlFlowLayoutRightToLeft.class.st index 4a9749358..e5aaf201b 100644 --- a/src/Bloc-Layout/BlFlowLayoutRightToLeft.class.st +++ b/src/Bloc-Layout/BlFlowLayoutRightToLeft.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutRightToLeft, #superclass : #BlFlowLayoutDirection, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlFlowLayoutVertical.class.st b/src/Bloc-Layout/BlFlowLayoutVertical.class.st index a7f7917f5..48f817fcf 100644 --- a/src/Bloc-Layout/BlFlowLayoutVertical.class.st +++ b/src/Bloc-Layout/BlFlowLayoutVertical.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFlowLayoutVertical, #superclass : #BlFlowLayoutOrientation, - #category : 'Bloc-Layout-Flow-Utilities' + #package : 'Bloc', + #tag : 'Layout-Flow-Utilities' } { #category : #measuring } diff --git a/src/Bloc-Layout/BlFrameLayoutConstraints.class.st b/src/Bloc-Layout/BlFrameLayoutConstraints.class.st index 182dab6e1..406b2d59d 100644 --- a/src/Bloc-Layout/BlFrameLayoutConstraints.class.st +++ b/src/Bloc-Layout/BlFrameLayoutConstraints.class.st @@ -1,7 +1,8 @@ Class { #name : #BlFrameLayoutConstraints, #superclass : #BlLayoutConstraints, - #category : 'Bloc-Layout-Frame' + #package : 'Bloc', + #tag : 'Layout-Frame' } { #category : #accessing } diff --git a/src/Bloc-Layout/BlGridAlignBoundsMode.class.st b/src/Bloc-Layout/BlGridAlignBoundsMode.class.st index cc01925ab..eadd077dd 100644 --- a/src/Bloc-Layout/BlGridAlignBoundsMode.class.st +++ b/src/Bloc-Layout/BlGridAlignBoundsMode.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridAlignBoundsMode, #superclass : #BlGridAlignmentMode, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlGridAlignMarginsMode.class.st b/src/Bloc-Layout/BlGridAlignMarginsMode.class.st index dbede9688..6dc65f2f4 100644 --- a/src/Bloc-Layout/BlGridAlignMarginsMode.class.st +++ b/src/Bloc-Layout/BlGridAlignMarginsMode.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridAlignMarginsMode, #superclass : #BlGridAlignmentMode, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlGridAlignment.class.st b/src/Bloc-Layout/BlGridAlignment.class.st index 57d80945e..4847d37d2 100644 --- a/src/Bloc-Layout/BlGridAlignment.class.st +++ b/src/Bloc-Layout/BlGridAlignment.class.st @@ -7,7 +7,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #factory } diff --git a/src/Bloc-Layout/BlGridAlignmentMode.class.st b/src/Bloc-Layout/BlGridAlignmentMode.class.st index 596ba2491..26062d344 100644 --- a/src/Bloc-Layout/BlGridAlignmentMode.class.st +++ b/src/Bloc-Layout/BlGridAlignmentMode.class.st @@ -5,7 +5,8 @@ Class { 'ALIGN_BOUNDS', 'ALIGN_MARGINS' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #'alignment modes' } diff --git a/src/Bloc-Layout/BlGridBaselineAlignment.class.st b/src/Bloc-Layout/BlGridBaselineAlignment.class.st index f92ae5211..38347a637 100644 --- a/src/Bloc-Layout/BlGridBaselineAlignment.class.st +++ b/src/Bloc-Layout/BlGridBaselineAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridBaselineAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridCanStretch.class.st b/src/Bloc-Layout/BlGridCanStretch.class.st index 490484ca5..0abfcd005 100644 --- a/src/Bloc-Layout/BlGridCanStretch.class.st +++ b/src/Bloc-Layout/BlGridCanStretch.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridCanStretch, #superclass : #BlGridFlexibility, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #comparing } diff --git a/src/Bloc-Layout/BlGridCenterAlignment.class.st b/src/Bloc-Layout/BlGridCenterAlignment.class.st index 0244a3871..a5bab8d09 100644 --- a/src/Bloc-Layout/BlGridCenterAlignment.class.st +++ b/src/Bloc-Layout/BlGridCenterAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridCenterAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridFillAlignment.class.st b/src/Bloc-Layout/BlGridFillAlignment.class.st index aab080626..88b9e9028 100644 --- a/src/Bloc-Layout/BlGridFillAlignment.class.st +++ b/src/Bloc-Layout/BlGridFillAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridFillAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridFlexibility.class.st b/src/Bloc-Layout/BlGridFlexibility.class.st index dafa9b004..fec8962dd 100644 --- a/src/Bloc-Layout/BlGridFlexibility.class.st +++ b/src/Bloc-Layout/BlGridFlexibility.class.st @@ -4,7 +4,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #factory } diff --git a/src/Bloc-Layout/BlGridHorizontalOrientation.class.st b/src/Bloc-Layout/BlGridHorizontalOrientation.class.st index a57b5e5c2..ceb793940 100644 --- a/src/Bloc-Layout/BlGridHorizontalOrientation.class.st +++ b/src/Bloc-Layout/BlGridHorizontalOrientation.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridHorizontalOrientation, #superclass : #BlGridOrientation, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #testing } diff --git a/src/Bloc-Layout/BlGridInflexible.class.st b/src/Bloc-Layout/BlGridInflexible.class.st index c2906249f..92111b36a 100644 --- a/src/Bloc-Layout/BlGridInflexible.class.st +++ b/src/Bloc-Layout/BlGridInflexible.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridInflexible, #superclass : #BlGridFlexibility, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #comparing } diff --git a/src/Bloc-Layout/BlGridLayoutBaselineBounds.class.st b/src/Bloc-Layout/BlGridLayoutBaselineBounds.class.st index b5e231c04..85f6f05b4 100644 --- a/src/Bloc-Layout/BlGridLayoutBaselineBounds.class.st +++ b/src/Bloc-Layout/BlGridLayoutBaselineBounds.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'size' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #accessing } diff --git a/src/Bloc-Layout/BlGridLayoutConstants.class.st b/src/Bloc-Layout/BlGridLayoutConstants.class.st index 37af2b23b..1423d6424 100644 --- a/src/Bloc-Layout/BlGridLayoutConstants.class.st +++ b/src/Bloc-Layout/BlGridLayoutConstants.class.st @@ -4,7 +4,8 @@ Class { #classVars : [ 'UNDEFINED' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #'class initialization' } diff --git a/src/Bloc-Layout/BlGridLayoutConstraints.class.st b/src/Bloc-Layout/BlGridLayoutConstraints.class.st index f663a9598..791ebaf6d 100644 --- a/src/Bloc-Layout/BlGridLayoutConstraints.class.st +++ b/src/Bloc-Layout/BlGridLayoutConstraints.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridLayoutConstraints, #superclass : #BlLayoutConstraints, - #category : 'Bloc-Layout-Grid' + #package : 'Bloc', + #tag : 'Layout-Grid' } { #category : #'as yet unclassified' } diff --git a/src/Bloc-Layout/BlGridLayoutConstraintsHorizontal.class.st b/src/Bloc-Layout/BlGridLayoutConstraintsHorizontal.class.st index 2455b0d2b..e5283a203 100644 --- a/src/Bloc-Layout/BlGridLayoutConstraintsHorizontal.class.st +++ b/src/Bloc-Layout/BlGridLayoutConstraintsHorizontal.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridLayoutConstraintsHorizontal, #superclass : #BlGridLayoutConstraintsAxis, - #category : 'Bloc-Layout-Grid' + #package : 'Bloc', + #tag : 'Layout-Grid' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridLayoutConstraintsVertical.class.st b/src/Bloc-Layout/BlGridLayoutConstraintsVertical.class.st index 792565542..bbd7dabfe 100644 --- a/src/Bloc-Layout/BlGridLayoutConstraintsVertical.class.st +++ b/src/Bloc-Layout/BlGridLayoutConstraintsVertical.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridLayoutConstraintsVertical, #superclass : #BlGridLayoutConstraintsAxis, - #category : 'Bloc-Layout-Grid' + #package : 'Bloc', + #tag : 'Layout-Grid' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridLeadingAlignment.class.st b/src/Bloc-Layout/BlGridLeadingAlignment.class.st index 08c083d97..26006aabd 100644 --- a/src/Bloc-Layout/BlGridLeadingAlignment.class.st +++ b/src/Bloc-Layout/BlGridLeadingAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridLeadingAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridOrientation.class.st b/src/Bloc-Layout/BlGridOrientation.class.st index a25aaa6b3..3d962795a 100644 --- a/src/Bloc-Layout/BlGridOrientation.class.st +++ b/src/Bloc-Layout/BlGridOrientation.class.st @@ -5,7 +5,8 @@ Class { 'HORIZONTAL', 'VERTICAL' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #factory } diff --git a/src/Bloc-Layout/BlGridPackedMap.class.st b/src/Bloc-Layout/BlGridPackedMap.class.st index 00804ca18..b85e21549 100644 --- a/src/Bloc-Layout/BlGridPackedMap.class.st +++ b/src/Bloc-Layout/BlGridPackedMap.class.st @@ -6,7 +6,8 @@ Class { 'indices', 'keys' ], - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #'instance creation' } diff --git a/src/Bloc-Layout/BlGridTrailingAlignment.class.st b/src/Bloc-Layout/BlGridTrailingAlignment.class.st index 5691881fc..61992ecbf 100644 --- a/src/Bloc-Layout/BlGridTrailingAlignment.class.st +++ b/src/Bloc-Layout/BlGridTrailingAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridTrailingAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridUndefinedAlignment.class.st b/src/Bloc-Layout/BlGridUndefinedAlignment.class.st index b968cb25f..681b149fe 100644 --- a/src/Bloc-Layout/BlGridUndefinedAlignment.class.st +++ b/src/Bloc-Layout/BlGridUndefinedAlignment.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridUndefinedAlignment, #superclass : #BlGridAlignment, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #alignment } diff --git a/src/Bloc-Layout/BlGridVerticalOrientation.class.st b/src/Bloc-Layout/BlGridVerticalOrientation.class.st index 897da6fd3..8da07edb6 100644 --- a/src/Bloc-Layout/BlGridVerticalOrientation.class.st +++ b/src/Bloc-Layout/BlGridVerticalOrientation.class.st @@ -1,7 +1,8 @@ Class { #name : #BlGridVerticalOrientation, #superclass : #BlGridOrientation, - #category : 'Bloc-Layout-Grid-Utilities' + #package : 'Bloc', + #tag : 'Layout-Grid-Utilities' } { #category : #testing } diff --git a/src/Bloc-Scripter/BlDevScripter.class.st b/src/Bloc-Scripter/BlDevScripter.class.st index 45fd59238..561843270 100644 --- a/src/Bloc-Scripter/BlDevScripter.class.st +++ b/src/Bloc-Scripter/BlDevScripter.class.st @@ -69,10 +69,12 @@ BlDevScripter >> continue [ { #category : #initialization } BlDevScripter >> defaultSpace [ + ^ BlOSpace new title: 'Scripter'; extent: 800 @ 600; - host: BlMockedHost new. + host: BlMockedHost new; + yourself. ] { #category : #'accessing - element' } @@ -181,7 +183,7 @@ BlDevScripter >> showSpace [ { #category : #'accessing - space' } BlDevScripter >> space [ - + ^ space ] @@ -192,10 +194,10 @@ BlDevScripter >> spaceTasks [ { #category : #'accessing - space' } BlDevScripter >> spaceWithElement [ - "Return ${class:BlSpace}$ and ensure that the ==element== is its child + "Return a space and ensure that the element is its child Useful when someone wants to display the resulting space (window) with the element. It cannot be used during the script execution." - + self element space = self space ifFalse: [ self space addChild: self elementWithoutParent ]. ^ self space diff --git a/src/Bloc-Scripter/BlDevScripterClickStep.class.st b/src/Bloc-Scripter/BlDevScripterClickStep.class.st index 0d932cb19..3cdeb7b88 100644 --- a/src/Bloc-Scripter/BlDevScripterClickStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterClickStep.class.st @@ -38,7 +38,7 @@ BlDevScripterClickStep >> omitDoubleClickOn: aScripter [ BlDevScripterClickStep >> playOn: aScripter [ self omitDoubleClickOn: aScripter. self - setMousePosition: (BlOSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter)) + setMousePosition: (BlSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter)) in: aScripter. aScripter pulse diff --git a/src/Bloc-Scripter/BlDevScripterDoubleClickStep.class.st b/src/Bloc-Scripter/BlDevScripterDoubleClickStep.class.st index 7cbc10587..24b1a4f49 100644 --- a/src/Bloc-Scripter/BlDevScripterDoubleClickStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterDoubleClickStep.class.st @@ -11,7 +11,7 @@ BlDevScripterDoubleClickStep >> defaultLabel [ { #category : #actions } BlDevScripterDoubleClickStep >> playOn: aScripter [ - BlOSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter). - BlOSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter). + BlSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter). + BlSpace simulateClickOn: (self target findTargetStartingInScripter: aScripter). aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterKeyClickStep.class.st b/src/Bloc-Scripter/BlDevScripterKeyClickStep.class.st index da6c340d3..8167c5d1a 100644 --- a/src/Bloc-Scripter/BlDevScripterKeyClickStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterKeyClickStep.class.st @@ -11,7 +11,7 @@ BlDevScripterKeyClickStep >> defaultLabel [ { #category : #actions } BlDevScripterKeyClickStep >> playOn: aScripter [ - BlOSpace simulateKeyDownOn: aScripter element key: self key. - BlOSpace simulateKeyUpOn: aScripter element key: self key. + BlSpace simulateKeyDownOn: aScripter element key: self key. + BlSpace simulateKeyUpOn: aScripter element key: self key. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterKeyDownStep.class.st b/src/Bloc-Scripter/BlDevScripterKeyDownStep.class.st index e4990a25c..8ea713c68 100644 --- a/src/Bloc-Scripter/BlDevScripterKeyDownStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterKeyDownStep.class.st @@ -11,6 +11,6 @@ BlDevScripterKeyDownStep >> defaultLabel [ { #category : #actions } BlDevScripterKeyDownStep >> playOn: aScripter [ - BlOSpace simulateKeyDownOn: aScripter element key: self key. + BlSpace simulateKeyDownOn: aScripter element key: self key. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterKeyUpStep.class.st b/src/Bloc-Scripter/BlDevScripterKeyUpStep.class.st index 4b45d66f5..af5010223 100644 --- a/src/Bloc-Scripter/BlDevScripterKeyUpStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterKeyUpStep.class.st @@ -11,6 +11,6 @@ BlDevScripterKeyUpStep >> defaultLabel [ { #category : #actions } BlDevScripterKeyUpStep >> playOn: aScripter [ - BlOSpace simulateKeyUpOn: aScripter element key: self key. + BlSpace simulateKeyUpOn: aScripter element key: self key. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterMouseDownStep.class.st b/src/Bloc-Scripter/BlDevScripterMouseDownStep.class.st index 68c60467d..a2341d143 100644 --- a/src/Bloc-Scripter/BlDevScripterMouseDownStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterMouseDownStep.class.st @@ -11,6 +11,6 @@ BlDevScripterMouseDownStep >> defaultLabel [ { #category : #actions } BlDevScripterMouseDownStep >> playOn: aScripter [ - BlOSpace simulateMouseDownOn: aScripter element at: (self getMousePositionIn: aScripter). + BlSpace simulateMouseDownOn: aScripter element at: (self getMousePositionIn: aScripter). aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterMouseMoveOverStep.class.st b/src/Bloc-Scripter/BlDevScripterMouseMoveOverStep.class.st index b6e33b7a2..63d918b57 100644 --- a/src/Bloc-Scripter/BlDevScripterMouseMoveOverStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterMouseMoveOverStep.class.st @@ -23,6 +23,6 @@ BlDevScripterMouseMoveOverStep >> playOn: aScripter [ self setMousePosition: aNewPosition in: aScripter. - BlOSpace simulateMouseMoveOn: aScripter element from: anOldPositon to: aNewPosition. + BlSpace simulateMouseMoveOn: aScripter element from: anOldPositon to: aNewPosition. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterMouseMoveStep.class.st b/src/Bloc-Scripter/BlDevScripterMouseMoveStep.class.st index 8ff23d53f..cdce44c93 100644 --- a/src/Bloc-Scripter/BlDevScripterMouseMoveStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterMouseMoveStep.class.st @@ -48,6 +48,6 @@ BlDevScripterMouseMoveStep >> playOn: aScripter [ self setMousePosition: aNewPosition in: aScripter. - BlOSpace simulateMouseMoveOn: aScripter element from: anOldPositon to: aNewPosition. + BlSpace simulateMouseMoveOn: aScripter element from: anOldPositon to: aNewPosition. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterMouseUpStep.class.st b/src/Bloc-Scripter/BlDevScripterMouseUpStep.class.st index 4af56d3d3..339c56563 100644 --- a/src/Bloc-Scripter/BlDevScripterMouseUpStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterMouseUpStep.class.st @@ -11,6 +11,6 @@ BlDevScripterMouseUpStep >> defaultLabel [ { #category : #actions } BlDevScripterMouseUpStep >> playOn: aScripter [ - BlOSpace simulateMouseUpOn: aScripter element at: (self getMousePositionIn: aScripter). + BlSpace simulateMouseUpOn: aScripter element at: (self getMousePositionIn: aScripter). aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterMouseWheelStep.class.st b/src/Bloc-Scripter/BlDevScripterMouseWheelStep.class.st index 009790058..a510b7640 100644 --- a/src/Bloc-Scripter/BlDevScripterMouseWheelStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterMouseWheelStep.class.st @@ -46,7 +46,7 @@ BlDevScripterMouseWheelStep >> playOn: aScripter [ aTarget := self target findTargetStartingInScripter: aScripter. self - setMousePosition: (BlOSpace simulateMouseWheelOn: aTarget by: self vector) + setMousePosition: (BlSpace simulateMouseWheelOn: aTarget by: self vector) in: aScripter. aScripter pulse diff --git a/src/Bloc-Scripter/BlDevScripterSecondaryClickStep.class.st b/src/Bloc-Scripter/BlDevScripterSecondaryClickStep.class.st index 67c56e2d2..d2dc16aa7 100644 --- a/src/Bloc-Scripter/BlDevScripterSecondaryClickStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterSecondaryClickStep.class.st @@ -12,7 +12,7 @@ BlDevScripterSecondaryClickStep >> defaultLabel [ { #category : #actions } BlDevScripterSecondaryClickStep >> playOn: aScripter [ self - setMousePosition: (BlOSpace simulateSecondaryClickOn: (self target findTargetStartingInScripter: aScripter)) + setMousePosition: (BlSpace simulateSecondaryClickOn: (self target findTargetStartingInScripter: aScripter)) in: aScripter. aScripter pulse ] diff --git a/src/Bloc-Scripter/BlDevScripterTypeTextStep.class.st b/src/Bloc-Scripter/BlDevScripterTypeTextStep.class.st index abd66483a..d1e85c19a 100644 --- a/src/Bloc-Scripter/BlDevScripterTypeTextStep.class.st +++ b/src/Bloc-Scripter/BlDevScripterTypeTextStep.class.st @@ -23,7 +23,7 @@ BlDevScripterTypeTextStep >> playOn: aScripter [ anInputEvent := BlTextInputEvent new text: self text. - BlOSpace + BlSpace simulateEvent: anInputEvent on: aTarget. diff --git a/src/Bloc-Spec2/SpBlSpaceInMorphPresenter.class.st b/src/Bloc-Spec2/SpBlSpaceInMorphPresenter.class.st index 035794d6c..87f02f01f 100644 --- a/src/Bloc-Spec2/SpBlSpaceInMorphPresenter.class.st +++ b/src/Bloc-Spec2/SpBlSpaceInMorphPresenter.class.st @@ -37,12 +37,13 @@ SpBlSpaceInMorphPresenter class >> example [ layout: BlFlowLayout horizontal. 50 timesRepeat: [ - aSpace addChild: (BlElement new - background: Color random translucent; - addEventHandlerOn: BlMouseEnterEvent - do: [ :evt | evt target - background: Color random ]; - yourself) ]. + aSpace root addChild: + (BlElement new + background: Color random translucent; + addEventHandlerOn: BlMouseEnterEvent + do: [ :evt | evt target + background: Color random ]; + yourself) ]. spacePresenter open. @@ -62,7 +63,7 @@ SpBlSpaceInMorphPresenter >> initializePresenters [ yourself); yourself. - space := BlOSpace new + space := BlSpace new host: (BlMorphicHost new containerMorph: morphPresenter morph; yourself); diff --git a/src/Bloc-Tests/BlColorPaintTest.class.st b/src/Bloc-Tests/BlColorPaintTest.class.st index 6973339a0..b12e67479 100644 --- a/src/Bloc-Tests/BlColorPaintTest.class.st +++ b/src/Bloc-Tests/BlColorPaintTest.class.st @@ -1,7 +1,8 @@ Class { #name : #BlColorPaintTest, #superclass : #TestCase, - #category : 'Bloc-Tests-Paint' + #package : 'Bloc', + #tag : 'Tests-Paint' } { #category : #tests } diff --git a/src/Bloc-Tests/BlCornerRadiiTest.class.st b/src/Bloc-Tests/BlCornerRadiiTest.class.st index a0144ebb1..23cf337df 100644 --- a/src/Bloc-Tests/BlCornerRadiiTest.class.st +++ b/src/Bloc-Tests/BlCornerRadiiTest.class.st @@ -1,7 +1,8 @@ Class { #name : #BlCornerRadiiTest, #superclass : #TestCase, - #category : 'Bloc-Tests-Basic-Support' + #package : 'Bloc', + #tag : 'Tests-Basic-Support' } { #category : #tests } diff --git a/src/Bloc-Tests/BlElementTest.class.st b/src/Bloc-Tests/BlElementTest.class.st index bd75d5850..4d44a1973 100644 --- a/src/Bloc-Tests/BlElementTest.class.st +++ b/src/Bloc-Tests/BlElementTest.class.st @@ -29,7 +29,7 @@ BlElementTest >> setUp [ super setUp. - space := BlOSpace new. + space := BlSpace new. host := BlMockedHost new. space host: host. diff --git a/src/Bloc-Tests/BlEventTest.class.st b/src/Bloc-Tests/BlEventTest.class.st index ca92df1a2..c716250cb 100644 --- a/src/Bloc-Tests/BlEventTest.class.st +++ b/src/Bloc-Tests/BlEventTest.class.st @@ -39,7 +39,7 @@ BlEventTest >> simulateClickOnOverlapped [ blue addEventHandlerOn: BlMouseUpEvent do: [ mouseUp := mouseUp + 1 ]. blue addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: blue. + BlSpace simulateClickOn: blue. self assert: mouseDown equals: 1. self assert: mouseUp equals: 1. @@ -78,7 +78,7 @@ BlEventTest >> testChildConsumesEventWithHandler [ parent addChild: child. - BlOSpace simulateClickOn: child. + BlSpace simulateClickOn: child. self assert: clicks equals: { Color blue } asOrderedCollection. ^ parent @@ -107,7 +107,7 @@ BlEventTest >> testChildDoesNotConsumeEventWithHandler [ parent addChild: child. - BlOSpace simulateClickOn: child. + BlSpace simulateClickOn: child. self assert: clicks equals: { Color blue. Color red } asOrderedCollection. @@ -185,7 +185,7 @@ BlEventTest >> testParentWithEventFilter [ parent addChild: child. - BlOSpace simulateClickOn: child. + BlSpace simulateClickOn: child. self assert: clicks equals: { Color red } asOrderedCollection. ^ parent @@ -217,7 +217,7 @@ BlEventTest >> testSimulateClick [ do: [ mouseUp := mouseUp + 1 ]. element addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: element. + BlSpace simulateClickOn: element. self assert: mouseDown equals: 1. self assert: mouseUp equals: 1. @@ -250,7 +250,7 @@ BlEventTest >> testSimulateClickOnChildInDisabledParent [ red addEventHandlerOn: BlMouseUpEvent do: [ mouseUp := mouseUp + 1 ]. red addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: red. + BlSpace simulateClickOn: red. self assert: mouseDown equals: 1. self assert: mouseUp equals: 1. @@ -297,7 +297,7 @@ BlEventTest >> testSimulateClickOnChildInParentPreventingChildren [ addEventHandlerOn: BlClickEvent do: [ parentClick := parentClick + 1 ]. - BlOSpace simulateClickOn: red. + BlSpace simulateClickOn: red. self assert: childMouseDown equals: 0. self assert: childMouseUp equals: 0. @@ -334,7 +334,7 @@ BlEventTest >> testSimulateClickOnChildInUnresponsiveParent [ red addEventHandlerOn: BlMouseUpEvent do: [ mouseUp := mouseUp + 1 ]. red addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: red. + BlSpace simulateClickOn: red. self assert: mouseDown equals: 0. self assert: mouseUp equals: 0. @@ -368,7 +368,7 @@ BlEventTest >> testSimulateClickOnTransformedAndRelocated [ do: [ mouseUp := mouseUp + 1 ]. element addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: element. + BlSpace simulateClickOn: element. self assert: mouseDown equals: 1. self assert: mouseUp equals: 1. @@ -412,7 +412,7 @@ BlEventTest >> testSimulateClickOnUnresponsiveOverlapped [ blue addEventHandlerOn: BlMouseUpEvent do: [ mouseUp := mouseUp + 1 ]. blue addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOn: blue. + BlSpace simulateClickOn: blue. self assert: mouseDown equals: 1. self assert: mouseUp equals: 1. @@ -440,7 +440,7 @@ BlEventTest >> testSimulateClickOutside [ do: [ mouseUp := mouseUp + 1 ]. element addEventHandlerOn: BlClickEvent do: [ click := click + 1 ]. - BlOSpace simulateClickOutside: element. + BlSpace simulateClickOutside: element. self assert: mouseDown equals: 0. self assert: mouseUp equals: 0. @@ -468,7 +468,7 @@ BlEventTest >> testSimulateMouseMoveInside [ addEventHandlerOn: BlMouseEnterEvent do: [ mouseEnter := mouseEnter + 1 ]. - BlOSpace simulateMouseMoveInside: element. + BlSpace simulateMouseMoveInside: element. self assert: mouseMove equals: 1. self assert: mouseEnter equals: 1. @@ -497,7 +497,7 @@ BlEventTest >> testSimulateMouseMoveOutside [ addEventHandlerOn: BlMouseLeaveEvent do: [ mouseLeave := mouseLeave + 1 ]. - BlOSpace simulateMouseMoveOutside: element. + BlSpace simulateMouseMoveOutside: element. self assert: mouseMove equals: 0. self assert: mouseEnter equals: 0. diff --git a/src/Bloc-Tests/BlEventTestCase.class.st b/src/Bloc-Tests/BlEventTestCase.class.st index 3d37e9d41..b47b1095e 100644 --- a/src/Bloc-Tests/BlEventTestCase.class.st +++ b/src/Bloc-Tests/BlEventTestCase.class.st @@ -29,15 +29,6 @@ BlEventTestCase >> firedEvents [ ^ space mouseProcessor firedEvents ] -{ #category : #initialization } -BlEventTestCase >> initSpace [ - space := BlOSpace new extent: 200 @ 200. - space mouseProcessor: (BlTestMouseEventProcessor space: space). - space focusProcessor: (BlTestFocusProcessor space: space). - space root addChild: (BlElement new size: 100 @ 100; background: Color red). - space pulse -] - { #category : #accessing } BlEventTestCase >> root [ ^ self space root @@ -63,7 +54,15 @@ BlEventTestCase >> sendOutsideTargetEvent: anEvent [ { #category : #initialization } BlEventTestCase >> setUp [ - self initSpace + + super setUp. + + space := BlSpace new. + space extent: 200 @ 200. + space mouseProcessor: (BlTestMouseEventProcessor space: space). + space focusProcessor: (BlTestFocusProcessor space: space). + space root addChild: (BlElement new size: 100 @ 100; background: Color red). + space pulse ] { #category : #accessing } diff --git a/src/Bloc-Tests/BlInsetsTest.class.st b/src/Bloc-Tests/BlInsetsTest.class.st index 44e2f00bb..58b80972c 100644 --- a/src/Bloc-Tests/BlInsetsTest.class.st +++ b/src/Bloc-Tests/BlInsetsTest.class.st @@ -1,7 +1,8 @@ Class { #name : #BlInsetsTest, #superclass : #TestCase, - #category : 'Bloc-Tests-Basic-Support' + #package : 'Bloc', + #tag : 'Tests-Basic-Support' } { #category : #tests } diff --git a/src/Bloc-Tests/BlKeyboardProcessorTest.class.st b/src/Bloc-Tests/BlKeyboardProcessorTest.class.st index 2bfd51e2b..c2bd6b41c 100644 --- a/src/Bloc-Tests/BlKeyboardProcessorTest.class.st +++ b/src/Bloc-Tests/BlKeyboardProcessorTest.class.st @@ -10,9 +10,10 @@ Class { { #category : #initialization } BlKeyboardProcessorTest >> setUp [ + super setUp. - space := BlOSpace new. + space := BlSpace new. processor := BlKeyboardProcessor new. processor space: space ] diff --git a/src/Bloc-Tests/BlMockedKeyCombination.class.st b/src/Bloc-Tests/BlMockedKeyCombination.class.st index daade5eff..6c701f674 100644 --- a/src/Bloc-Tests/BlMockedKeyCombination.class.st +++ b/src/Bloc-Tests/BlMockedKeyCombination.class.st @@ -7,7 +7,8 @@ Class { #instVars : [ 'shouldMatch' ], - #category : 'Bloc-Tests-KeyBinding' + #package : 'Bloc', + #tag : 'Tests-KeyBinding' } { #category : #visiting } diff --git a/src/Bloc-Tests/BlMockedKeyboardBuffer.class.st b/src/Bloc-Tests/BlMockedKeyboardBuffer.class.st index d469f97d2..c40bca9de 100644 --- a/src/Bloc-Tests/BlMockedKeyboardBuffer.class.st +++ b/src/Bloc-Tests/BlMockedKeyboardBuffer.class.st @@ -7,7 +7,8 @@ Class { #instVars : [ 'states' ], - #category : 'Bloc-Tests-KeyBinding' + #package : 'Bloc', + #tag : 'Tests-KeyBinding' } { #category : #testing } diff --git a/src/Bloc-Tests/BlSpaceTest.class.st b/src/Bloc-Tests/BlSpaceTest.class.st index 105045c4c..3ff587e2e 100644 --- a/src/Bloc-Tests/BlSpaceTest.class.st +++ b/src/Bloc-Tests/BlSpaceTest.class.st @@ -17,7 +17,7 @@ BlSpaceTest >> dirtyAreas [ BlSpaceTest >> setUp [ super setUp. - space := BlOSpace new. + space := BlSpace new. host := BlMockedHost new. space host: host. diff --git a/src/Bloc-Tests/BlTestFocusProcessor.class.st b/src/Bloc-Tests/BlTestFocusProcessor.class.st index b6ee1fcc0..6944596d5 100644 --- a/src/Bloc-Tests/BlTestFocusProcessor.class.st +++ b/src/Bloc-Tests/BlTestFocusProcessor.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'firedEvents' ], - #category : 'Bloc-Tests-Universe' + #package : 'Bloc', + #tag : 'Tests-Universe' } { #category : #'event firing' } diff --git a/src/Bloc-Tests/BlTestMouseEventProcessor.class.st b/src/Bloc-Tests/BlTestMouseEventProcessor.class.st index fce2275ef..15c4924ee 100644 --- a/src/Bloc-Tests/BlTestMouseEventProcessor.class.st +++ b/src/Bloc-Tests/BlTestMouseEventProcessor.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'firedEvents' ], - #category : 'Bloc-Tests-Universe' + #package : 'Bloc', + #tag : 'Tests-Universe' } { #category : #'as yet unclassified' } diff --git a/src/Bloc-Text/BlAscentLooseBaselineMeasurer.class.st b/src/Bloc-Text/BlAscentLooseBaselineMeasurer.class.st index 8859ddfe9..f1c438d62 100644 --- a/src/Bloc-Text/BlAscentLooseBaselineMeasurer.class.st +++ b/src/Bloc-Text/BlAscentLooseBaselineMeasurer.class.st @@ -6,7 +6,8 @@ I am a baseline which is computed based on ascent property of the paragraph Class { #name : 'BlAscentLooseBaselineMeasurer', #superclass : 'BlTextParagraphBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlAscentTightBaselineMeasurer.class.st b/src/Bloc-Text/BlAscentTightBaselineMeasurer.class.st index b3ad71b3c..35add86a4 100644 --- a/src/Bloc-Text/BlAscentTightBaselineMeasurer.class.st +++ b/src/Bloc-Text/BlAscentTightBaselineMeasurer.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlAscentTightBaselineMeasurer', #superclass : 'BlTextParagraphBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlBoundsBaselineMeasurer.class.st b/src/Bloc-Text/BlBoundsBaselineMeasurer.class.st index 15d456e6c..7a1d55c92 100644 --- a/src/Bloc-Text/BlBoundsBaselineMeasurer.class.st +++ b/src/Bloc-Text/BlBoundsBaselineMeasurer.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlBoundsBaselineMeasurer', #superclass : 'BlTextParagraphBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlCharacterText.class.st b/src/Bloc-Text/BlCharacterText.class.st index 301a84297..3b63ab35d 100644 --- a/src/Bloc-Text/BlCharacterText.class.st +++ b/src/Bloc-Text/BlCharacterText.class.st @@ -8,7 +8,8 @@ Similar to the String I can not modified (insertion or deletions). Therefore Class { #name : 'BlCharacterText', #superclass : 'BlReadonlyText', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlEmptyText.class.st b/src/Bloc-Text/BlEmptyText.class.st index 60b0617f6..f9788e0ed 100644 --- a/src/Bloc-Text/BlEmptyText.class.st +++ b/src/Bloc-Text/BlEmptyText.class.st @@ -4,7 +4,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlEmptyTextIterator.class.st b/src/Bloc-Text/BlEmptyTextIterator.class.st index 259575e07..8dabae076 100644 --- a/src/Bloc-Text/BlEmptyTextIterator.class.st +++ b/src/Bloc-Text/BlEmptyTextIterator.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlEmptyTextIterator', #superclass : 'BlTextIterator', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlFont.class.st b/src/Bloc-Text/BlFont.class.st index 9ef598048..94879d902 100644 --- a/src/Bloc-Text/BlFont.class.st +++ b/src/Bloc-Text/BlFont.class.st @@ -3,7 +3,8 @@ Class { #superclass : 'Object', #traits : 'TBlFontDescriptor + TBlFont', #classTraits : 'TBlFontDescriptor classTrait + TBlFont classTrait', - #category : 'Bloc-Text-Font', + #package : 'Bloc', + #tag : 'Text-Font', #package : 'Bloc-Text', #tag : 'Font' } diff --git a/src/Bloc-Text/BlFontEmphasisAttribute.class.st b/src/Bloc-Text/BlFontEmphasisAttribute.class.st index 7454180bf..b60385a9b 100644 --- a/src/Bloc-Text/BlFontEmphasisAttribute.class.st +++ b/src/Bloc-Text/BlFontEmphasisAttribute.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlFontEmphasisAttribute', #superclass : 'BlTextAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontFamilyAttribute.class.st b/src/Bloc-Text/BlFontFamilyAttribute.class.st index 475e7a1ef..93dcc8202 100644 --- a/src/Bloc-Text/BlFontFamilyAttribute.class.st +++ b/src/Bloc-Text/BlFontFamilyAttribute.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'name' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontFamilyDefaultAttribute.class.st b/src/Bloc-Text/BlFontFamilyDefaultAttribute.class.st index eeb61f587..6e5aa242b 100644 --- a/src/Bloc-Text/BlFontFamilyDefaultAttribute.class.st +++ b/src/Bloc-Text/BlFontFamilyDefaultAttribute.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'name' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontItalicAttribute.class.st b/src/Bloc-Text/BlFontItalicAttribute.class.st index 8c9380d85..a592f06b9 100644 --- a/src/Bloc-Text/BlFontItalicAttribute.class.st +++ b/src/Bloc-Text/BlFontItalicAttribute.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlFontItalicAttribute', #superclass : 'BlFontEmphasisAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontNormalAttribute.class.st b/src/Bloc-Text/BlFontNormalAttribute.class.st index 3ba702d71..4e83bb0ef 100644 --- a/src/Bloc-Text/BlFontNormalAttribute.class.st +++ b/src/Bloc-Text/BlFontNormalAttribute.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlFontNormalAttribute', #superclass : 'BlFontEmphasisAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontObliqueAttribute.class.st b/src/Bloc-Text/BlFontObliqueAttribute.class.st index 931649cdf..20e49a071 100644 --- a/src/Bloc-Text/BlFontObliqueAttribute.class.st +++ b/src/Bloc-Text/BlFontObliqueAttribute.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlFontObliqueAttribute', #superclass : 'BlFontEmphasisAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontSize.class.st b/src/Bloc-Text/BlFontSize.class.st index 05148ccb0..05e2227d7 100644 --- a/src/Bloc-Text/BlFontSize.class.st +++ b/src/Bloc-Text/BlFontSize.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlFontSize', #superclass : 'BlValueWithUnit', - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlFontSizeAttribute.class.st b/src/Bloc-Text/BlFontSizeAttribute.class.st index 315e20fbe..eeace6bde 100644 --- a/src/Bloc-Text/BlFontSizeAttribute.class.st +++ b/src/Bloc-Text/BlFontSizeAttribute.class.st @@ -22,7 +22,8 @@ Class { #instVars : [ 'size' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontSizeDefaultAttribute.class.st b/src/Bloc-Text/BlFontSizeDefaultAttribute.class.st index 0e23645d0..4c1f30794 100644 --- a/src/Bloc-Text/BlFontSizeDefaultAttribute.class.st +++ b/src/Bloc-Text/BlFontSizeDefaultAttribute.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'size' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlFontSlant.class.st b/src/Bloc-Text/BlFontSlant.class.st index d985f2c2f..340355e07 100644 --- a/src/Bloc-Text/BlFontSlant.class.st +++ b/src/Bloc-Text/BlFontSlant.class.st @@ -11,7 +11,8 @@ Class { 'Oblique', 'Slants' ], - #category : 'Bloc-Text-Font', + #package : 'Bloc', + #tag : 'Text-Font', #package : 'Bloc-Text', #tag : 'Font' } diff --git a/src/Bloc-Text/BlFontStretch.class.st b/src/Bloc-Text/BlFontStretch.class.st index 3391cc2be..fe19688b6 100644 --- a/src/Bloc-Text/BlFontStretch.class.st +++ b/src/Bloc-Text/BlFontStretch.class.st @@ -16,7 +16,8 @@ Class { 'UltraCondensed', 'UltraExpanded' ], - #category : 'Bloc-Text-Font', + #package : 'Bloc', + #tag : 'Text-Font', #package : 'Bloc-Text', #tag : 'Font' } diff --git a/src/Bloc-Text/BlFontWeight.class.st b/src/Bloc-Text/BlFontWeight.class.st index 22828111c..f69d2df15 100644 --- a/src/Bloc-Text/BlFontWeight.class.st +++ b/src/Bloc-Text/BlFontWeight.class.st @@ -19,7 +19,8 @@ Class { 'Thin', 'Weights' ], - #category : 'Bloc-Text-Font', + #package : 'Bloc', + #tag : 'Text-Font', #package : 'Bloc-Text', #tag : 'Font' } diff --git a/src/Bloc-Text/BlFontWeightAttribute.class.st b/src/Bloc-Text/BlFontWeightAttribute.class.st index c12269d9e..bd552c131 100644 --- a/src/Bloc-Text/BlFontWeightAttribute.class.st +++ b/src/Bloc-Text/BlFontWeightAttribute.class.st @@ -25,7 +25,8 @@ Class { #instVars : [ 'weight' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlGenerationText.class.st b/src/Bloc-Text/BlGenerationText.class.st index d81870577..f1785cf5b 100644 --- a/src/Bloc-Text/BlGenerationText.class.st +++ b/src/Bloc-Text/BlGenerationText.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'previousGeneration' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlIntervalCollector.class.st b/src/Bloc-Text/BlIntervalCollector.class.st index fc7248832..44fa6b4cb 100644 --- a/src/Bloc-Text/BlIntervalCollector.class.st +++ b/src/Bloc-Text/BlIntervalCollector.class.st @@ -8,7 +8,8 @@ Class { #instVars : [ 'finder' ], - #category : 'Bloc-Text-Text-Operator', + #package : 'Bloc', + #tag : 'Text-Text-Operator', #package : 'Bloc-Text', #tag : 'Text-Operator' } diff --git a/src/Bloc-Text/BlPositionFinder.class.st b/src/Bloc-Text/BlPositionFinder.class.st index 68bda7bb2..3dba1468b 100644 --- a/src/Bloc-Text/BlPositionFinder.class.st +++ b/src/Bloc-Text/BlPositionFinder.class.st @@ -13,7 +13,8 @@ Class { 'patterns', 'stepLength' ], - #category : 'Bloc-Text-Text-Operator', + #package : 'Bloc', + #tag : 'Text-Text-Operator', #package : 'Bloc-Text', #tag : 'Text-Operator' } diff --git a/src/Bloc-Text/BlRBTextStyler.class.st b/src/Bloc-Text/BlRBTextStyler.class.st index 074f77550..df3102a7e 100644 --- a/src/Bloc-Text/BlRBTextStyler.class.st +++ b/src/Bloc-Text/BlRBTextStyler.class.st @@ -18,7 +18,8 @@ Class { 'styleTable', 'textAttributes' ], - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlReadonlyText.class.st b/src/Bloc-Text/BlReadonlyText.class.st index e19734e33..70b51c889 100644 --- a/src/Bloc-Text/BlReadonlyText.class.st +++ b/src/Bloc-Text/BlReadonlyText.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlReadonlyText', #superclass : 'BlWrappedText', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlSpan.class.st b/src/Bloc-Text/BlSpan.class.st index ea3b57925..5f8034be0 100644 --- a/src/Bloc-Text/BlSpan.class.st +++ b/src/Bloc-Text/BlSpan.class.st @@ -9,7 +9,8 @@ Class { #instVars : [ 'attributes' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlStylerStateChanged.class.st b/src/Bloc-Text/BlStylerStateChanged.class.st index cba058420..784da7f18 100644 --- a/src/Bloc-Text/BlStylerStateChanged.class.st +++ b/src/Bloc-Text/BlStylerStateChanged.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlStylerStateChanged', #superclass : 'Announcement', - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlStylerTextStyleRequested.class.st b/src/Bloc-Text/BlStylerTextStyleRequested.class.st index b8666478a..a2d811349 100644 --- a/src/Bloc-Text/BlStylerTextStyleRequested.class.st +++ b/src/Bloc-Text/BlStylerTextStyleRequested.class.st @@ -5,7 +5,8 @@ Class { 'unstyledText', 'referentElement' ], - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlStylerTextStyled.class.st b/src/Bloc-Text/BlStylerTextStyled.class.st index 008d1c7a3..03bf5896c 100644 --- a/src/Bloc-Text/BlStylerTextStyled.class.st +++ b/src/Bloc-Text/BlStylerTextStyled.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'styledText' ], - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlSubText.class.st b/src/Bloc-Text/BlSubText.class.st index 1f0dffc59..ae8a2db37 100644 --- a/src/Bloc-Text/BlSubText.class.st +++ b/src/Bloc-Text/BlSubText.class.st @@ -14,7 +14,8 @@ Class { 'start', 'end' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlSubTextIterator.class.st b/src/Bloc-Text/BlSubTextIterator.class.st index 0fd490558..b5f3a5b2c 100644 --- a/src/Bloc-Text/BlSubTextIterator.class.st +++ b/src/Bloc-Text/BlSubTextIterator.class.st @@ -5,7 +5,8 @@ Class { 'text', 'iterator' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlText.class.st b/src/Bloc-Text/BlText.class.st index cafa43f78..febb99a85 100644 --- a/src/Bloc-Text/BlText.class.st +++ b/src/Bloc-Text/BlText.class.st @@ -32,7 +32,8 @@ Class { #instVars : [ 'announcer' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextAnnouncer.class.st b/src/Bloc-Text/BlTextAnnouncer.class.st index 6799f51c2..d75326b6b 100644 --- a/src/Bloc-Text/BlTextAnnouncer.class.st +++ b/src/Bloc-Text/BlTextAnnouncer.class.st @@ -5,7 +5,8 @@ Class { 'suspendAll', 'suspendedAnnouncemets' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextAttribute.class.st b/src/Bloc-Text/BlTextAttribute.class.st index 7edc8b237..a9d28b8f0 100644 --- a/src/Bloc-Text/BlTextAttribute.class.st +++ b/src/Bloc-Text/BlTextAttribute.class.st @@ -6,7 +6,8 @@ Class { #instVars : [ 'isOverwritableByStyler' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextAttributeAdded.class.st b/src/Bloc-Text/BlTextAttributeAdded.class.st index c86ab3948..7fd65bb2f 100644 --- a/src/Bloc-Text/BlTextAttributeAdded.class.st +++ b/src/Bloc-Text/BlTextAttributeAdded.class.st @@ -6,7 +6,8 @@ Class { 'fromIndex', 'toIndex' ], - #category : 'Bloc-Text-Text-Events', + #package : 'Bloc', + #tag : 'Text-Text-Events', #package : 'Bloc-Text', #tag : 'Text-Events' } diff --git a/src/Bloc-Text/BlTextAttributesBuilder.class.st b/src/Bloc-Text/BlTextAttributesBuilder.class.st index 1c1f7dd98..14c534b35 100644 --- a/src/Bloc-Text/BlTextAttributesBuilder.class.st +++ b/src/Bloc-Text/BlTextAttributesBuilder.class.st @@ -19,7 +19,8 @@ Class { #instVars : [ 'attributes' ], - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlTextAttributesCachingFinder.class.st b/src/Bloc-Text/BlTextAttributesCachingFinder.class.st index e5fd2d6e8..dd829f4f2 100644 --- a/src/Bloc-Text/BlTextAttributesCachingFinder.class.st +++ b/src/Bloc-Text/BlTextAttributesCachingFinder.class.st @@ -10,7 +10,8 @@ Class { #instVars : [ 'attributes' ], - #category : 'Bloc-Text-Text-Attributes Finder', + #package : 'Bloc', + #tag : 'Text-Text-Attributes Finder', #package : 'Bloc-Text', #tag : 'Text-Attributes Finder' } diff --git a/src/Bloc-Text/BlTextAttributesDynamicFinder.class.st b/src/Bloc-Text/BlTextAttributesDynamicFinder.class.st index 2cc3d7007..3c1225547 100644 --- a/src/Bloc-Text/BlTextAttributesDynamicFinder.class.st +++ b/src/Bloc-Text/BlTextAttributesDynamicFinder.class.st @@ -6,7 +6,8 @@ Class { #instVars : [ 'text' ], - #category : 'Bloc-Text-Text-Attributes Finder', + #package : 'Bloc', + #tag : 'Text-Text-Attributes Finder', #package : 'Bloc-Text', #tag : 'Text-Attributes Finder' } diff --git a/src/Bloc-Text/BlTextAttributesExplicitFinder.class.st b/src/Bloc-Text/BlTextAttributesExplicitFinder.class.st index 8d02005d5..ab4238b92 100644 --- a/src/Bloc-Text/BlTextAttributesExplicitFinder.class.st +++ b/src/Bloc-Text/BlTextAttributesExplicitFinder.class.st @@ -7,7 +7,8 @@ Class { 'attributes', 'interval' ], - #category : 'Bloc-Text-Text-Attributes Finder', + #package : 'Bloc', + #tag : 'Text-Text-Attributes Finder', #package : 'Bloc-Text', #tag : 'Text-Attributes Finder' } diff --git a/src/Bloc-Text/BlTextAttributesIgnoringFinder.class.st b/src/Bloc-Text/BlTextAttributesIgnoringFinder.class.st index 27c2a6e0f..1e16cce16 100644 --- a/src/Bloc-Text/BlTextAttributesIgnoringFinder.class.st +++ b/src/Bloc-Text/BlTextAttributesIgnoringFinder.class.st @@ -3,7 +3,8 @@ Class { #superclass : 'Object', #traits : 'TBlTextAttributesFinder', #classTraits : 'TBlTextAttributesFinder classTrait', - #category : 'Bloc-Text-Text-Attributes Finder', + #package : 'Bloc', + #tag : 'Text-Text-Attributes Finder', #package : 'Bloc-Text', #tag : 'Text-Attributes Finder' } diff --git a/src/Bloc-Text/BlTextAttributesRemoved.class.st b/src/Bloc-Text/BlTextAttributesRemoved.class.st index c92d8a08d..61710e32a 100644 --- a/src/Bloc-Text/BlTextAttributesRemoved.class.st +++ b/src/Bloc-Text/BlTextAttributesRemoved.class.st @@ -9,7 +9,8 @@ Class { 'fromIndex', 'toIndex' ], - #category : 'Bloc-Text-Text-Events', + #package : 'Bloc', + #tag : 'Text-Text-Events', #package : 'Bloc-Text', #tag : 'Text-Events' } diff --git a/src/Bloc-Text/BlTextAttributesStyler.class.st b/src/Bloc-Text/BlTextAttributesStyler.class.st index 98db61d94..44e711f24 100644 --- a/src/Bloc-Text/BlTextAttributesStyler.class.st +++ b/src/Bloc-Text/BlTextAttributesStyler.class.st @@ -37,7 +37,8 @@ Class { 'text', 'properties' ], - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlTextBackgroundAttribute.class.st b/src/Bloc-Text/BlTextBackgroundAttribute.class.st index 3c1f717a5..e55675bbd 100644 --- a/src/Bloc-Text/BlTextBackgroundAttribute.class.st +++ b/src/Bloc-Text/BlTextBackgroundAttribute.class.st @@ -22,7 +22,8 @@ Class { #instVars : [ 'paint' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextClassLink.class.st b/src/Bloc-Text/BlTextClassLink.class.st index 8838c65b5..0921f79bd 100644 --- a/src/Bloc-Text/BlTextClassLink.class.st +++ b/src/Bloc-Text/BlTextClassLink.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextClassLink', #superclass : 'BlTextLinkAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextDecoration.class.st b/src/Bloc-Text/BlTextDecoration.class.st index db3b2b5e2..c8da5be96 100644 --- a/src/Bloc-Text/BlTextDecoration.class.st +++ b/src/Bloc-Text/BlTextDecoration.class.st @@ -7,7 +7,8 @@ Class { 'style', 'type' ], - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationAttribute.class.st b/src/Bloc-Text/BlTextDecorationAttribute.class.st index 595d4c78e..e5a4abb28 100644 --- a/src/Bloc-Text/BlTextDecorationAttribute.class.st +++ b/src/Bloc-Text/BlTextDecorationAttribute.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'decoration' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextDecorationCompositeType.class.st b/src/Bloc-Text/BlTextDecorationCompositeType.class.st index 124be8380..90e74f65f 100644 --- a/src/Bloc-Text/BlTextDecorationCompositeType.class.st +++ b/src/Bloc-Text/BlTextDecorationCompositeType.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'types' ], - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationDashedStyle.class.st b/src/Bloc-Text/BlTextDecorationDashedStyle.class.st index 68c9381c0..60a9767f2 100644 --- a/src/Bloc-Text/BlTextDecorationDashedStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationDashedStyle.class.st @@ -6,7 +6,8 @@ Class { #name : 'BlTextDecorationDashedStyle', #superclass : 'BlTextDecorationStyle', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationDottedStyle.class.st b/src/Bloc-Text/BlTextDecorationDottedStyle.class.st index e4fb7a565..1945fa750 100644 --- a/src/Bloc-Text/BlTextDecorationDottedStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationDottedStyle.class.st @@ -6,7 +6,8 @@ Class { #name : 'BlTextDecorationDottedStyle', #superclass : 'BlTextDecorationStyle', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationDoubleStyle.class.st b/src/Bloc-Text/BlTextDecorationDoubleStyle.class.st index 94de6a453..65195287f 100644 --- a/src/Bloc-Text/BlTextDecorationDoubleStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationDoubleStyle.class.st @@ -6,7 +6,8 @@ Class { #name : 'BlTextDecorationDoubleStyle', #superclass : 'BlTextDecorationStyle', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationLineThroughType.class.st b/src/Bloc-Text/BlTextDecorationLineThroughType.class.st index 6ad23f1dc..6f929677e 100644 --- a/src/Bloc-Text/BlTextDecorationLineThroughType.class.st +++ b/src/Bloc-Text/BlTextDecorationLineThroughType.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextDecorationLineThroughType', #superclass : 'BlTextDecorationSingleType', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationOverlineType.class.st b/src/Bloc-Text/BlTextDecorationOverlineType.class.st index 60b07d659..62c58f17c 100644 --- a/src/Bloc-Text/BlTextDecorationOverlineType.class.st +++ b/src/Bloc-Text/BlTextDecorationOverlineType.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextDecorationOverlineType', #superclass : 'BlTextDecorationSingleType', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationSingleType.class.st b/src/Bloc-Text/BlTextDecorationSingleType.class.st index 440fb7efe..30bafde23 100644 --- a/src/Bloc-Text/BlTextDecorationSingleType.class.st +++ b/src/Bloc-Text/BlTextDecorationSingleType.class.st @@ -4,7 +4,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationSolidStyle.class.st b/src/Bloc-Text/BlTextDecorationSolidStyle.class.st index ba8918257..18d17bfaf 100644 --- a/src/Bloc-Text/BlTextDecorationSolidStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationSolidStyle.class.st @@ -6,7 +6,8 @@ Class { #name : 'BlTextDecorationSolidStyle', #superclass : 'BlTextDecorationStyle', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationStyle.class.st b/src/Bloc-Text/BlTextDecorationStyle.class.st index ce3fea2eb..31a948a0f 100644 --- a/src/Bloc-Text/BlTextDecorationStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationStyle.class.st @@ -9,7 +9,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationType.class.st b/src/Bloc-Text/BlTextDecorationType.class.st index eaefb8933..cdf222efa 100644 --- a/src/Bloc-Text/BlTextDecorationType.class.st +++ b/src/Bloc-Text/BlTextDecorationType.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextDecorationType', #superclass : 'Object', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationUnderlineType.class.st b/src/Bloc-Text/BlTextDecorationUnderlineType.class.st index d490dd456..91c979bd1 100644 --- a/src/Bloc-Text/BlTextDecorationUnderlineType.class.st +++ b/src/Bloc-Text/BlTextDecorationUnderlineType.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextDecorationUnderlineType', #superclass : 'BlTextDecorationSingleType', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDecorationWavyStyle.class.st b/src/Bloc-Text/BlTextDecorationWavyStyle.class.st index 91b5ee4d0..b9ef1da73 100644 --- a/src/Bloc-Text/BlTextDecorationWavyStyle.class.st +++ b/src/Bloc-Text/BlTextDecorationWavyStyle.class.st @@ -6,7 +6,8 @@ Class { #name : 'BlTextDecorationWavyStyle', #superclass : 'BlTextDecorationStyle', - #category : 'Bloc-Text-Text-Decoration', + #package : 'Bloc', + #tag : 'Text-Text-Decoration', #package : 'Bloc-Text', #tag : 'Text-Decoration' } diff --git a/src/Bloc-Text/BlTextDelegatedAttributesBuilder.class.st b/src/Bloc-Text/BlTextDelegatedAttributesBuilder.class.st index 7a7997f7e..54bffdb90 100644 --- a/src/Bloc-Text/BlTextDelegatedAttributesBuilder.class.st +++ b/src/Bloc-Text/BlTextDelegatedAttributesBuilder.class.st @@ -10,7 +10,8 @@ Class { 'attributeAddedBlock', 'isOverwritableByStyler' ], - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlTextError.class.st b/src/Bloc-Text/BlTextError.class.st index dd418a726..3fde604f8 100644 --- a/src/Bloc-Text/BlTextError.class.st +++ b/src/Bloc-Text/BlTextError.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextError', #superclass : 'Error', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextFontAndStyleBuilder.class.st b/src/Bloc-Text/BlTextFontAndStyleBuilder.class.st index 3b1a81a9c..66090f016 100644 --- a/src/Bloc-Text/BlTextFontAndStyleBuilder.class.st +++ b/src/Bloc-Text/BlTextFontAndStyleBuilder.class.st @@ -9,7 +9,8 @@ Class { 'defaultFontSize', 'defaultFontFamilyName' ], - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlTextForegroundAttribute.class.st b/src/Bloc-Text/BlTextForegroundAttribute.class.st index 7a63782fe..e7b90aa86 100644 --- a/src/Bloc-Text/BlTextForegroundAttribute.class.st +++ b/src/Bloc-Text/BlTextForegroundAttribute.class.st @@ -22,7 +22,8 @@ Class { #instVars : [ 'paint' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextIterator.class.st b/src/Bloc-Text/BlTextIterator.class.st index 28b68a2ff..6d28c0362 100644 --- a/src/Bloc-Text/BlTextIterator.class.st +++ b/src/Bloc-Text/BlTextIterator.class.st @@ -9,7 +9,8 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextLinkAttribute.class.st b/src/Bloc-Text/BlTextLinkAttribute.class.st index 69d3f621b..016703bc7 100644 --- a/src/Bloc-Text/BlTextLinkAttribute.class.st +++ b/src/Bloc-Text/BlTextLinkAttribute.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextLinkAttribute', #superclass : 'BlTextAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextMethodLink.class.st b/src/Bloc-Text/BlTextMethodLink.class.st index 65fc26a35..b6aac7132 100644 --- a/src/Bloc-Text/BlTextMethodLink.class.st +++ b/src/Bloc-Text/BlTextMethodLink.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextMethodLink', #superclass : 'BlTextLinkAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextNonPrintableCharacterPrinter.class.st b/src/Bloc-Text/BlTextNonPrintableCharacterPrinter.class.st index b881486fc..b23fafae2 100644 --- a/src/Bloc-Text/BlTextNonPrintableCharacterPrinter.class.st +++ b/src/Bloc-Text/BlTextNonPrintableCharacterPrinter.class.st @@ -4,7 +4,8 @@ Class { #classVars : [ 'CharacterMap' ], - #category : 'Bloc-Text-Text-Support', + #package : 'Bloc', + #tag : 'Text-Text-Support', #package : 'Bloc-Text', #tag : 'Text-Support' } diff --git a/src/Bloc-Text/BlTextOperator.class.st b/src/Bloc-Text/BlTextOperator.class.st index a36005d9c..1bd042961 100644 --- a/src/Bloc-Text/BlTextOperator.class.st +++ b/src/Bloc-Text/BlTextOperator.class.st @@ -6,7 +6,8 @@ Class { #instVars : [ 'text' ], - #category : 'Bloc-Text-Text-Operator', + #package : 'Bloc', + #tag : 'Text-Text-Operator', #package : 'Bloc-Text', #tag : 'Text-Operator' } diff --git a/src/Bloc-Text/BlTextOutOfBoundsError.class.st b/src/Bloc-Text/BlTextOutOfBoundsError.class.st index a2fdeb859..57bdd11fb 100644 --- a/src/Bloc-Text/BlTextOutOfBoundsError.class.st +++ b/src/Bloc-Text/BlTextOutOfBoundsError.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextOutOfBoundsError', #superclass : 'BlTextError', - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextParagraph.class.st b/src/Bloc-Text/BlTextParagraph.class.st index f5541a66a..c3f5995fe 100644 --- a/src/Bloc-Text/BlTextParagraph.class.st +++ b/src/Bloc-Text/BlTextParagraph.class.st @@ -41,7 +41,8 @@ Class { 'session', 'baselineMeasurer' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphAscentLooseBaseline.class.st b/src/Bloc-Text/BlTextParagraphAscentLooseBaseline.class.st index ba9a04dff..feeefa6f6 100644 --- a/src/Bloc-Text/BlTextParagraphAscentLooseBaseline.class.st +++ b/src/Bloc-Text/BlTextParagraphAscentLooseBaseline.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextParagraphAscentLooseBaseline', #superclass : 'BlAscentLooseBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph-Deprecated', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph-Deprecated', #package : 'Bloc-Text', #tag : 'Text-Paragraph-Deprecated' } diff --git a/src/Bloc-Text/BlTextParagraphAscentTightBaseline.class.st b/src/Bloc-Text/BlTextParagraphAscentTightBaseline.class.st index ea2c74d52..997bbca2b 100644 --- a/src/Bloc-Text/BlTextParagraphAscentTightBaseline.class.st +++ b/src/Bloc-Text/BlTextParagraphAscentTightBaseline.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextParagraphAscentTightBaseline', #superclass : 'BlAscentTightBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph-Deprecated', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph-Deprecated', #package : 'Bloc-Text', #tag : 'Text-Paragraph-Deprecated' } diff --git a/src/Bloc-Text/BlTextParagraphBaselineMeasurer.class.st b/src/Bloc-Text/BlTextParagraphBaselineMeasurer.class.st index d5ad8a5c3..e31b82baa 100644 --- a/src/Bloc-Text/BlTextParagraphBaselineMeasurer.class.st +++ b/src/Bloc-Text/BlTextParagraphBaselineMeasurer.class.st @@ -11,7 +11,8 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphBoundsBaseline.class.st b/src/Bloc-Text/BlTextParagraphBoundsBaseline.class.st index 99208ac39..07dd346da 100644 --- a/src/Bloc-Text/BlTextParagraphBoundsBaseline.class.st +++ b/src/Bloc-Text/BlTextParagraphBoundsBaseline.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextParagraphBoundsBaseline', #superclass : 'BlBoundsBaselineMeasurer', - #category : 'Bloc-Text-Text-Paragraph-Deprecated', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph-Deprecated', #package : 'Bloc-Text', #tag : 'Text-Paragraph-Deprecated' } diff --git a/src/Bloc-Text/BlTextParagraphHighlight.class.st b/src/Bloc-Text/BlTextParagraphHighlight.class.st index bd28d9733..02f6e3793 100644 --- a/src/Bloc-Text/BlTextParagraphHighlight.class.st +++ b/src/Bloc-Text/BlTextParagraphHighlight.class.st @@ -10,7 +10,8 @@ Class { 'paint', 'selection' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphLine.class.st b/src/Bloc-Text/BlTextParagraphLine.class.st index 6157a4e31..97692cf07 100644 --- a/src/Bloc-Text/BlTextParagraphLine.class.st +++ b/src/Bloc-Text/BlTextParagraphLine.class.st @@ -10,7 +10,8 @@ Class { #instVars : [ 'spans' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphMeasurer.class.st b/src/Bloc-Text/BlTextParagraphMeasurer.class.st index 83dc06797..6eb99de52 100644 --- a/src/Bloc-Text/BlTextParagraphMeasurer.class.st +++ b/src/Bloc-Text/BlTextParagraphMeasurer.class.st @@ -12,7 +12,8 @@ Class { 'line', 'hostTextMeasurer' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphSegment.class.st b/src/Bloc-Text/BlTextParagraphSegment.class.st index cea48301a..5df9d8c1d 100644 --- a/src/Bloc-Text/BlTextParagraphSegment.class.st +++ b/src/Bloc-Text/BlTextParagraphSegment.class.st @@ -19,7 +19,8 @@ Class { 'descent', 'baseline' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextParagraphSegmentLeaf.class.st b/src/Bloc-Text/BlTextParagraphSegmentLeaf.class.st index 8acbb2a80..096d661a0 100644 --- a/src/Bloc-Text/BlTextParagraphSegmentLeaf.class.st +++ b/src/Bloc-Text/BlTextParagraphSegmentLeaf.class.st @@ -10,7 +10,8 @@ Class { 'hostMeasurer', 'fontAndStyleBuilder' ], - #category : 'Bloc-Text-Text-Paragraph', + #package : 'Bloc', + #tag : 'Text-Text-Paragraph', #package : 'Bloc-Text', #tag : 'Text-Paragraph' } diff --git a/src/Bloc-Text/BlTextReadStream.class.st b/src/Bloc-Text/BlTextReadStream.class.st index 167c7add5..5d022e0c1 100644 --- a/src/Bloc-Text/BlTextReadStream.class.st +++ b/src/Bloc-Text/BlTextReadStream.class.st @@ -11,7 +11,8 @@ Class { #instVars : [ 'iterator' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-Text/BlTextSpacingAttribute.class.st b/src/Bloc-Text/BlTextSpacingAttribute.class.st index ffb126da0..650b82d9c 100644 --- a/src/Bloc-Text/BlTextSpacingAttribute.class.st +++ b/src/Bloc-Text/BlTextSpacingAttribute.class.st @@ -4,7 +4,8 @@ Class { #instVars : [ 'spacing' ], - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextStringsInserted.class.st b/src/Bloc-Text/BlTextStringsInserted.class.st index ef5dc17a8..fbabf9eff 100644 --- a/src/Bloc-Text/BlTextStringsInserted.class.st +++ b/src/Bloc-Text/BlTextStringsInserted.class.st @@ -10,7 +10,8 @@ Class { 'finalIndices', 'requestedIndices' ], - #category : 'Bloc-Text-Text-Events', + #package : 'Bloc', + #tag : 'Text-Text-Events', #package : 'Bloc-Text', #tag : 'Text-Events' } diff --git a/src/Bloc-Text/BlTextStyler.class.st b/src/Bloc-Text/BlTextStyler.class.st index 4eccab284..c3b9433af 100644 --- a/src/Bloc-Text/BlTextStyler.class.st +++ b/src/Bloc-Text/BlTextStyler.class.st @@ -26,7 +26,8 @@ Class { 'text', 'launcher' ], - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlTextStylerLauncher.class.st b/src/Bloc-Text/BlTextStylerLauncher.class.st index af458dbf4..8a069d586 100644 --- a/src/Bloc-Text/BlTextStylerLauncher.class.st +++ b/src/Bloc-Text/BlTextStylerLauncher.class.st @@ -15,7 +15,8 @@ Class { #classVars : [ 'MinTextSizeForStylingInBackground' ], - #category : 'Bloc-Text-Text-Styler', + #package : 'Bloc', + #tag : 'Text-Text-Styler', #package : 'Bloc-Text', #tag : 'Text-Styler' } diff --git a/src/Bloc-Text/BlTextTrimmer.class.st b/src/Bloc-Text/BlTextTrimmer.class.st index 7cef4110f..dbeed01be 100644 --- a/src/Bloc-Text/BlTextTrimmer.class.st +++ b/src/Bloc-Text/BlTextTrimmer.class.st @@ -5,7 +5,8 @@ Class { 'leftTrimPatterns', 'rightTrimPatterns' ], - #category : 'Bloc-Text-Text-Operator', + #package : 'Bloc', + #tag : 'Text-Text-Operator', #package : 'Bloc-Text', #tag : 'Text-Operator' } diff --git a/src/Bloc-Text/BlTextVariableLink.class.st b/src/Bloc-Text/BlTextVariableLink.class.st index 00c890360..10503f46a 100644 --- a/src/Bloc-Text/BlTextVariableLink.class.st +++ b/src/Bloc-Text/BlTextVariableLink.class.st @@ -1,7 +1,8 @@ Class { #name : 'BlTextVariableLink', #superclass : 'BlTextLinkAttribute', - #category : 'Bloc-Text-Text-Attributes', + #package : 'Bloc', + #tag : 'Text-Text-Attributes', #package : 'Bloc-Text', #tag : 'Text-Attributes' } diff --git a/src/Bloc-Text/BlTextsDeleted.class.st b/src/Bloc-Text/BlTextsDeleted.class.st index 74ac9d1bd..f324058d1 100644 --- a/src/Bloc-Text/BlTextsDeleted.class.st +++ b/src/Bloc-Text/BlTextsDeleted.class.st @@ -10,7 +10,8 @@ Class { 'finalIntervals', 'requestedIntervals' ], - #category : 'Bloc-Text-Text-Events', + #package : 'Bloc', + #tag : 'Text-Text-Events', #package : 'Bloc-Text', #tag : 'Text-Events' } diff --git a/src/Bloc-Text/BlWrappedText.class.st b/src/Bloc-Text/BlWrappedText.class.st index f2f1f17ae..8811a7b00 100644 --- a/src/Bloc-Text/BlWrappedText.class.st +++ b/src/Bloc-Text/BlWrappedText.class.st @@ -8,7 +8,8 @@ Class { #instVars : [ 'text' ], - #category : 'Bloc-Text-Text', + #package : 'Bloc', + #tag : 'Text-Text', #package : 'Bloc-Text', #tag : 'Text' } diff --git a/src/Bloc-UnitedTests/BlAnnulusSectorGeometryTest.class.st b/src/Bloc-UnitedTests/BlAnnulusSectorGeometryTest.class.st index ca5481eaf..d5eab03ff 100644 --- a/src/Bloc-UnitedTests/BlAnnulusSectorGeometryTest.class.st +++ b/src/Bloc-UnitedTests/BlAnnulusSectorGeometryTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlAnnulus Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlAnnulusSectorGeometryTest', - #superclass : 'BlGeometryTest', - #category : 'Bloc-UnitedTests-Geometry', - #package : 'Bloc-UnitedTests', - #tag : 'Geometry' + #name : #BlAnnulusSectorGeometryTest, + #superclass : #BlGeometryTest, + #package : 'Bloc', + #tag : 'UnitedTests-Geometry' } -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testAnnulus [ @@ -30,7 +29,7 @@ BlAnnulusSectorGeometryTest >> testAnnulus [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testAnnulusSectorBottomLeft [ @@ -52,7 +51,7 @@ BlAnnulusSectorGeometryTest >> testAnnulusSectorBottomLeft [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testAnnulusSectorBottomRight [ @@ -74,7 +73,7 @@ BlAnnulusSectorGeometryTest >> testAnnulusSectorBottomRight [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testAnnulusSectorTopLeft [ @@ -96,7 +95,7 @@ BlAnnulusSectorGeometryTest >> testAnnulusSectorTopLeft [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testAnnulusSectorTopRight [ @@ -118,7 +117,7 @@ BlAnnulusSectorGeometryTest >> testAnnulusSectorTopRight [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testCircle [ @@ -139,7 +138,7 @@ BlAnnulusSectorGeometryTest >> testCircle [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testCircleSector [ @@ -160,7 +159,7 @@ BlAnnulusSectorGeometryTest >> testCircleSector [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testDefault [ @@ -178,7 +177,7 @@ BlAnnulusSectorGeometryTest >> testDefault [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testOuterRadiusSmallerThanInner [ @@ -198,7 +197,7 @@ BlAnnulusSectorGeometryTest >> testOuterRadiusSmallerThanInner [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testPacman [ @@ -219,7 +218,7 @@ BlAnnulusSectorGeometryTest >> testPacman [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testRadiiOutsideOfValidInterval [ @@ -239,7 +238,7 @@ BlAnnulusSectorGeometryTest >> testRadiiOutsideOfValidInterval [ ^ aSector ] -{ #category : 'tests' } +{ #category : #tests } BlAnnulusSectorGeometryTest >> testSameRadii [ diff --git a/src/Bloc-UnitedTests/BlBasicTest.class.st b/src/Bloc-UnitedTests/BlBasicTest.class.st index 0ee96128a..1fb4f3b43 100644 --- a/src/Bloc-UnitedTests/BlBasicTest.class.st +++ b/src/Bloc-UnitedTests/BlBasicTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlBasicEx Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlBasicTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Basic', - #package : 'Bloc-UnitedTests', - #tag : 'Basic' + #name : #BlBasicTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Basic' } -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testAsForm [ | anElement | @@ -32,7 +31,7 @@ BlBasicTest >> testAsForm [ equals: Color green ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testBorderRopedText [ | aText | @@ -45,7 +44,7 @@ self assert: aText rope attributes equals: { (BlFontSizeAttribute size: 30). ^ aText ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testBorderTextElement [ @@ -59,7 +58,7 @@ BlBasicTest >> testBorderTextElement [ c frame horizontal alignCenter ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testBottomBorder [ @@ -67,7 +66,7 @@ BlBasicTest >> testBottomBorder [ c frame vertical alignBottom ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testButtons [ ^ self testContainer @@ -76,7 +75,7 @@ BlBasicTest >> testButtons [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testCircle [ ^ BlElement new @@ -86,7 +85,7 @@ BlBasicTest >> testCircle [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testColoredButton [ @@ -126,7 +125,7 @@ BlBasicTest >> testColoredButton [ ^ button ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testContainer [ @@ -138,7 +137,7 @@ BlBasicTest >> testContainer [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testElementWithAllBorders [ @@ -152,7 +151,7 @@ BlBasicTest >> testElementWithAllBorders [ addChild: (self testBottomBorder background: Color red) ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testElementWithEllipticBorders [ @@ -175,7 +174,7 @@ BlBasicTest >> testElementWithEllipticBorders [ addChild: self testBorderTextElement ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testElementsWithShadow [ @@ -184,7 +183,7 @@ BlBasicTest >> testElementsWithShadow [ (self testEllipseWithShadow position: 500 @ 100) } ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testEllipse [ @@ -194,7 +193,7 @@ BlBasicTest >> testEllipse [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testEllipseWithShadow [ @@ -208,7 +207,7 @@ BlBasicTest >> testEllipseWithShadow [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testFabButton [ @@ -253,7 +252,7 @@ BlBasicTest >> testFabButton [ ^ button ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testHorizontalBorder [ ^ BlElement new constraintsDo: [ :c | @@ -261,7 +260,7 @@ BlBasicTest >> testHorizontalBorder [ c horizontal matchParent ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testLeftBorder [ @@ -269,7 +268,7 @@ BlBasicTest >> testLeftBorder [ c frame horizontal alignLeft ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testLinearGradient [ @@ -283,7 +282,7 @@ BlBasicTest >> testLinearGradient [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testPolygon [ @@ -300,7 +299,7 @@ BlBasicTest >> testPolygon [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRectangle [ @@ -313,7 +312,7 @@ BlBasicTest >> testRectangle [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRectangleWithImage [ @@ -326,7 +325,7 @@ BlBasicTest >> testRectangleWithImage [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRectangleWithLinearGradient [ @@ -338,7 +337,7 @@ BlBasicTest >> testRectangleWithLinearGradient [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRectangleWithShadow [ @@ -351,7 +350,7 @@ BlBasicTest >> testRectangleWithShadow [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRightBorder [ @@ -359,7 +358,7 @@ BlBasicTest >> testRightBorder [ c frame horizontal alignRight ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testRoundedRectangle [ @@ -371,14 +370,14 @@ BlBasicTest >> testRoundedRectangle [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testShadowEffect [ ^ BlGaussianShadowEffect color: Color black width: 10 offset: 10 @ 10 ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testShapes [ ^ self testContainer addChildren: { @@ -390,7 +389,7 @@ BlBasicTest >> testShapes [ (self testSquare position: 400 @ 200) } ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testSquare [ @@ -402,7 +401,7 @@ BlBasicTest >> testSquare [ yourself ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testTopBorder [ @@ -410,7 +409,7 @@ BlBasicTest >> testTopBorder [ c frame vertical alignTop ] ] -{ #category : 'tests' } +{ #category : #tests } BlBasicTest >> testVerticalBorder [ diff --git a/src/Bloc-UnitedTests/BlBorderTest.class.st b/src/Bloc-UnitedTests/BlBorderTest.class.st index 413c30d1f..e774cdf84 100644 --- a/src/Bloc-UnitedTests/BlBorderTest.class.st +++ b/src/Bloc-UnitedTests/BlBorderTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlBorderE Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlBorderTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Basic', - #package : 'Bloc-UnitedTests', - #tag : 'Basic' + #name : #BlBorderTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Basic' } -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testChangeOpacityError [ @@ -26,7 +25,7 @@ BlBorderTest >> testChangeOpacityError [ ^ anError ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testChangePaintError [ @@ -42,7 +41,7 @@ BlBorderTest >> testChangePaintError [ ^ anError ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testChangeStyleError [ @@ -58,7 +57,7 @@ BlBorderTest >> testChangeStyleError [ ^ anError ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testChangeWidthError [ @@ -74,7 +73,7 @@ BlBorderTest >> testChangeWidthError [ ^ anError ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlBorderTest >> testColorGrayBorder [ @@ -97,7 +96,7 @@ BlBorderTest >> testColorGrayBorder [ ^ aBorder ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testColorGrayBorderWithExplicitWidth [ @@ -120,7 +119,7 @@ BlBorderTest >> testColorGrayBorderWithExplicitWidth [ ^ aBorder ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testCopyWithOpacity [ @@ -144,7 +143,7 @@ BlBorderTest >> testCopyWithOpacity [ ^ aBorder ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testCopyWithPaint [ @@ -168,7 +167,7 @@ BlBorderTest >> testCopyWithPaint [ ^ aBorder ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testCopyWithStyle [ @@ -192,7 +191,7 @@ BlBorderTest >> testCopyWithStyle [ ^ aBorder ] -{ #category : 'tests' } +{ #category : #tests } BlBorderTest >> testCopyWithWidth [ diff --git a/src/Bloc-UnitedTests/BlBoundsMatcherTest.class.st b/src/Bloc-UnitedTests/BlBoundsMatcherTest.class.st index 969636d16..7f5c328b0 100644 --- a/src/Bloc-UnitedTests/BlBoundsMatcherTest.class.st +++ b/src/Bloc-UnitedTests/BlBoundsMatcherTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlBoundsM Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlBoundsMatcherTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Bounds', - #package : 'Bloc-UnitedTests', - #tag : 'Bounds' + #name : #BlBoundsMatcherTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Bounds' } -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartEqualParentStartWhenEquals [ | aMatcher | @@ -23,7 +22,7 @@ BlBoundsMatcherTest >> testChildStartEqualParentStartWhenEquals [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartEqualParentStartWhenGreater [ | aMatcher | @@ -36,7 +35,7 @@ BlBoundsMatcherTest >> testChildStartEqualParentStartWhenGreater [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartEqualParentStartWhenLess [ | aMatcher | @@ -49,7 +48,7 @@ BlBoundsMatcherTest >> testChildStartEqualParentStartWhenLess [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenEquals [ | aMatcher | @@ -62,7 +61,7 @@ BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenEquals [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenGreater [ | aMatcher | @@ -75,7 +74,7 @@ BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenGreater [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenLess [ | aMatcher | @@ -88,7 +87,7 @@ BlBoundsMatcherTest >> testChildStartGreaterThanParentStartWhenLess [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartLessThanParentStartWhenEquals [ | aMatcher | @@ -101,7 +100,7 @@ BlBoundsMatcherTest >> testChildStartLessThanParentStartWhenEquals [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartLessThanParentStartWhenGreater [ | aMatcher | @@ -114,7 +113,7 @@ BlBoundsMatcherTest >> testChildStartLessThanParentStartWhenGreater [ ^ aMatcher ] -{ #category : 'tests' } +{ #category : #tests } BlBoundsMatcherTest >> testChildStartLessThanParentStartWhenLess [ | aMatcher | diff --git a/src/Bloc-UnitedTests/BlChildrenArrayTest.class.st b/src/Bloc-UnitedTests/BlChildrenArrayTest.class.st index 586dfc9c6..3d8bab065 100644 --- a/src/Bloc-UnitedTests/BlChildrenArrayTest.class.st +++ b/src/Bloc-UnitedTests/BlChildrenArrayTest.class.st @@ -3,16 +3,15 @@ I have been automatically converted and probably manually tweaked from BlChildre Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlChildrenArrayTest', - #superclass : 'TestCase', + #name : #BlChildrenArrayTest, + #superclass : #TestCase, #traits : 'TBlChildrenTest', #classTraits : 'TBlChildrenTest classTrait', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #package : 'Bloc', + #tag : 'UnitedTests-Children' } -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenArrayTest >> fill: aNumber [ | childrenArray | @@ -22,7 +21,7 @@ BlChildrenArrayTest >> fill: aNumber [ ^ childrenArray ] -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenArrayTest >> newChildAt: anIndex [ | anElement | @@ -31,14 +30,14 @@ BlChildrenArrayTest >> newChildAt: anIndex [ ^ anElement ] -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenArrayTest >> newChildrenCollection [ ^ BlChildrenArray new ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAdd [ @@ -55,7 +54,7 @@ BlChildrenArrayTest >> testAdd [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAddAt [ @@ -80,7 +79,7 @@ BlChildrenArrayTest >> testAddAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAsArray [ @@ -92,7 +91,7 @@ BlChildrenArrayTest >> testAsArray [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAsArrayEmpty [ @@ -104,7 +103,7 @@ BlChildrenArrayTest >> testAsArrayEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAt [ @@ -118,7 +117,7 @@ BlChildrenArrayTest >> testAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testAtIfAbsent [ @@ -144,7 +143,7 @@ BlChildrenArrayTest >> testAtIfAbsent [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testEmptyChildren [ @@ -156,7 +155,7 @@ BlChildrenArrayTest >> testEmptyChildren [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testEmptyChildrenExplicitCreation [ @@ -168,7 +167,7 @@ BlChildrenArrayTest >> testEmptyChildrenExplicitCreation [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testEmptyChildrenFactoryMethodCreation [ @@ -182,7 +181,7 @@ BlChildrenArrayTest >> testEmptyChildrenFactoryMethodCreation [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testFirst [ @@ -192,7 +191,7 @@ BlChildrenArrayTest >> testFirst [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIfEmpty [ @@ -202,7 +201,7 @@ BlChildrenArrayTest >> testIfEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIfEmptyNot [ @@ -212,7 +211,7 @@ BlChildrenArrayTest >> testIfEmptyNot [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIndexOf [ @@ -223,7 +222,7 @@ BlChildrenArrayTest >> testIndexOf [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIndexOfUnknown [ @@ -233,7 +232,7 @@ BlChildrenArrayTest >> testIndexOfUnknown [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIsEmpty [ @@ -245,7 +244,7 @@ BlChildrenArrayTest >> testIsEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testIsNotEmpty [ @@ -257,7 +256,7 @@ BlChildrenArrayTest >> testIsNotEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testLast [ @@ -267,7 +266,7 @@ BlChildrenArrayTest >> testLast [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testRemove [ @@ -280,7 +279,7 @@ BlChildrenArrayTest >> testRemove [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testRemoveAll [ @@ -296,7 +295,7 @@ BlChildrenArrayTest >> testRemoveAll [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testRemoveAt [ @@ -311,7 +310,7 @@ BlChildrenArrayTest >> testRemoveAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testSecond [ @@ -321,7 +320,7 @@ BlChildrenArrayTest >> testSecond [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testSize [ @@ -331,7 +330,7 @@ BlChildrenArrayTest >> testSize [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenArrayTest >> testSizeEmpty [ diff --git a/src/Bloc-UnitedTests/BlChildrenLinkedListTest.class.st b/src/Bloc-UnitedTests/BlChildrenLinkedListTest.class.st index 5895fa1f4..2493aaf80 100644 --- a/src/Bloc-UnitedTests/BlChildrenLinkedListTest.class.st +++ b/src/Bloc-UnitedTests/BlChildrenLinkedListTest.class.st @@ -3,13 +3,12 @@ I have been automatically converted and probably manually tweaked from BlChildre Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlChildrenLinkedListTest', - #superclass : 'TestCase', + #name : #BlChildrenLinkedListTest, + #superclass : #TestCase, #traits : 'TBlChildrenTest', #classTraits : 'TBlChildrenTest classTrait', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #package : 'Bloc', + #tag : 'UnitedTests-Children' } { #category : 'fixture' } diff --git a/src/Bloc-UnitedTests/BlChildrenOrderedCollectionTest.class.st b/src/Bloc-UnitedTests/BlChildrenOrderedCollectionTest.class.st index 39f6d52d4..084c4d0a3 100644 --- a/src/Bloc-UnitedTests/BlChildrenOrderedCollectionTest.class.st +++ b/src/Bloc-UnitedTests/BlChildrenOrderedCollectionTest.class.st @@ -3,16 +3,15 @@ I have been automatically converted and probably manually tweaked from BlChildre Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlChildrenOrderedCollectionTest', - #superclass : 'TestCase', + #name : #BlChildrenOrderedCollectionTest, + #superclass : #TestCase, #traits : 'TBlChildrenTest', #classTraits : 'TBlChildrenTest classTrait', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #package : 'Bloc', + #tag : 'UnitedTests-Children' } -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenOrderedCollectionTest >> fill: aNumber [ | childrenArray | @@ -22,7 +21,7 @@ BlChildrenOrderedCollectionTest >> fill: aNumber [ ^ childrenArray ] -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenOrderedCollectionTest >> newChildAt: anIndex [ | anElement | @@ -31,13 +30,13 @@ BlChildrenOrderedCollectionTest >> newChildAt: anIndex [ ^ anElement ] -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenOrderedCollectionTest >> newChildrenCollection [ ^ BlChildrenOrderedCollection new ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testEmptyChildren [ | theChildren | @@ -48,7 +47,7 @@ BlChildrenOrderedCollectionTest >> testEmptyChildren [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testFirst [ @@ -58,7 +57,7 @@ BlChildrenOrderedCollectionTest >> testFirst [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIfEmpty [ | theChildren | @@ -67,7 +66,7 @@ BlChildrenOrderedCollectionTest >> testIfEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIfEmptyNot [ | theChildren | @@ -76,7 +75,7 @@ BlChildrenOrderedCollectionTest >> testIfEmptyNot [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIndexOf [ | theChildren | @@ -86,7 +85,7 @@ BlChildrenOrderedCollectionTest >> testIndexOf [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIndexOfUnknown [ | theChildren | @@ -95,7 +94,7 @@ BlChildrenOrderedCollectionTest >> testIndexOfUnknown [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIsEmpty [ | theChildren | @@ -106,7 +105,7 @@ BlChildrenOrderedCollectionTest >> testIsEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testIsNotEmpty [ | theChildren | @@ -117,7 +116,7 @@ BlChildrenOrderedCollectionTest >> testIsNotEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testLast [ | theChildren | @@ -126,7 +125,7 @@ BlChildrenOrderedCollectionTest >> testLast [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testRemove [ | theChildren indices | @@ -138,7 +137,7 @@ BlChildrenOrderedCollectionTest >> testRemove [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testRemoveAll [ | theChildren indices | @@ -153,7 +152,7 @@ BlChildrenOrderedCollectionTest >> testRemoveAll [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testRemoveAt [ | theChildren indices | @@ -167,7 +166,7 @@ BlChildrenOrderedCollectionTest >> testRemoveAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testSecond [ | theChildren | @@ -176,7 +175,7 @@ BlChildrenOrderedCollectionTest >> testSecond [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testSize [ | theChildren | @@ -185,7 +184,7 @@ BlChildrenOrderedCollectionTest >> testSize [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenOrderedCollectionTest >> testSizeEmpty [ | theChildren | diff --git a/src/Bloc-UnitedTests/BlChildrenRopeTest.class.st b/src/Bloc-UnitedTests/BlChildrenRopeTest.class.st index 4649f1341..e502c3029 100644 --- a/src/Bloc-UnitedTests/BlChildrenRopeTest.class.st +++ b/src/Bloc-UnitedTests/BlChildrenRopeTest.class.st @@ -3,29 +3,28 @@ I have been automatically converted and probably manually tweaked from BlChildre Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlChildrenRopeTest', - #superclass : 'TestCase', + #name : #BlChildrenRopeTest, + #superclass : #TestCase, #traits : 'TBlChildrenTest', #classTraits : 'TBlChildrenTest classTrait', - #category : 'Bloc-UnitedTests-Rope', - #package : 'Bloc-UnitedTests', - #tag : 'Rope' + #package : 'Bloc', + #tag : 'UnitedTests-Rope' } -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenRopeTest >> newChildrenCollection [ ^ BlChildrenRope new ] -{ #category : 'as yet unclassified' } +{ #category : #'as yet unclassified' } BlChildrenRopeTest >> originClassName [ "This test was generated from..." ^ 'BlChildrenRopeExamples' ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenRopeTest >> testEmptyChildrenExplicitCreation [ diff --git a/src/Bloc-UnitedTests/BlChildrenSubsetTest.class.st b/src/Bloc-UnitedTests/BlChildrenSubsetTest.class.st index 05331cc7b..002b10f27 100644 --- a/src/Bloc-UnitedTests/BlChildrenSubsetTest.class.st +++ b/src/Bloc-UnitedTests/BlChildrenSubsetTest.class.st @@ -3,37 +3,36 @@ I have been automatically converted and probably manually tweaked from BlChildre Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlChildrenSubsetTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #name : #BlChildrenSubsetTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Children' } -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> accountedByLayout [ ^ self testAccountedByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> childrenArrayWith5Elements [ ^ self testChildrenArrayWith5Elements ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> elementWithChildren [ ^ self testElementWithChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> ignoredByLayout [ ^ self testIgnoredByLayout ] -{ #category : 'fixture' } +{ #category : #fixture } BlChildrenSubsetTest >> newChildAt: anIndex [ | anElement | anElement := BlElement new. @@ -41,26 +40,26 @@ BlChildrenSubsetTest >> newChildAt: anIndex [ ^ anElement ] -{ #category : 'metadata' } +{ #category : #metadata } BlChildrenSubsetTest >> originClassName [ "This test was generated from..." ^ 'BlChildrenSubsetExamples' ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> reversed [ ^ self testReversed ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> sortedByElevation [ ^ self testSortedByElevation ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testAccountedByLayout [ | childrenArray childrenIterator | @@ -80,7 +79,7 @@ BlChildrenSubsetTest >> testAccountedByLayout [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testAccountedByLayoutAndIgnoredByLayout [ | childrenIterator childrenIteratorIgnoredByLayout | @@ -93,7 +92,7 @@ BlChildrenSubsetTest >> testAccountedByLayoutAndIgnoredByLayout [ ^ childrenIteratorIgnoredByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testAccountedByLayoutAndReversed [ | childrenIterator childrenIteratorReversed | @@ -115,7 +114,7 @@ BlChildrenSubsetTest >> testAccountedByLayoutAndReversed [ ^ childrenIteratorReversed ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testAccountedByLayoutChildrenFromElement [ | element accountedByLayoutChildren | @@ -125,7 +124,7 @@ BlChildrenSubsetTest >> testAccountedByLayoutChildrenFromElement [ ^ accountedByLayoutChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testAccountedByLayoutTwice [ | childrenIterator childrenIteratorAccountedByLayout | @@ -136,7 +135,7 @@ BlChildrenSubsetTest >> testAccountedByLayoutTwice [ ^ childrenIteratorAccountedByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testChildrenArrayWith5Elements [ | childrenArray zIndex | @@ -156,7 +155,7 @@ BlChildrenSubsetTest >> testChildrenArrayWith5Elements [ ^ childrenArray ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testChildrenWithMultipleCombinedSubsets [ | element children | @@ -173,7 +172,7 @@ BlChildrenSubsetTest >> testChildrenWithMultipleCombinedSubsets [ ^ children ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testElementWithChildren [ | element | @@ -184,7 +183,7 @@ BlChildrenSubsetTest >> testElementWithChildren [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayout [ | childrenArray childrenIterator | @@ -202,7 +201,7 @@ BlChildrenSubsetTest >> testIgnoredByLayout [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayoutAndAcountedByLayout [ | childrenIterator childrenIteratorAcountedByLayout | @@ -216,7 +215,7 @@ BlChildrenSubsetTest >> testIgnoredByLayoutAndAcountedByLayout [ ^ childrenIteratorAcountedByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayoutAndReverse [ | childrenIterator childrenIteratorReversed | @@ -235,7 +234,7 @@ BlChildrenSubsetTest >> testIgnoredByLayoutAndReverse [ ^ childrenIteratorReversed ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayoutExplicitCreation [ | childrenArray childrenIterator | @@ -253,7 +252,7 @@ BlChildrenSubsetTest >> testIgnoredByLayoutExplicitCreation [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayoutFromElement [ | element ignoredByLayoutChildren | @@ -263,7 +262,7 @@ BlChildrenSubsetTest >> testIgnoredByLayoutFromElement [ ^ ignoredByLayoutChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testIgnoredByLayoutTwice [ | childrenIterator childrenIteratorIgnoredByLayout | @@ -273,7 +272,7 @@ BlChildrenSubsetTest >> testIgnoredByLayoutTwice [ ^ childrenIteratorIgnoredByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testReversed [ | childrenArray childrenIterator | @@ -288,7 +287,7 @@ BlChildrenSubsetTest >> testReversed [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testReversedAndAcountedByLayout [ | childrenIterator childrenIteratorAcountedByLayout | @@ -317,7 +316,7 @@ BlChildrenSubsetTest >> testReversedAndAcountedByLayout [ ^ childrenIteratorAcountedByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testReversedAndIgnoredByLayout [ | childrenIterator childrenIteratorIgnoredByLayout | @@ -341,7 +340,7 @@ BlChildrenSubsetTest >> testReversedAndIgnoredByLayout [ ^ childrenIteratorIgnoredByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testReversedChildrenFromElement [ | element reversedChildren | @@ -351,7 +350,7 @@ BlChildrenSubsetTest >> testReversedChildrenFromElement [ ^ reversedChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testReversedTwice [ | childrenIterator | @@ -365,7 +364,7 @@ BlChildrenSubsetTest >> testReversedTwice [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevation [ | childrenArray childrenIterator expectedOrder | @@ -381,7 +380,7 @@ BlChildrenSubsetTest >> testSortedByElevation [ ^ childrenIterator ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevationAndAcountedByLayout [ | childrenIterator childrenIteratorAcountedByLayout | @@ -404,7 +403,7 @@ BlChildrenSubsetTest >> testSortedByElevationAndAcountedByLayout [ ^ childrenIteratorAcountedByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevationAndIgnoredByLayout [ | childrenIterator childrenIteratorIgnoredByLayout | @@ -423,7 +422,7 @@ BlChildrenSubsetTest >> testSortedByElevationAndIgnoredByLayout [ ^ childrenIteratorIgnoredByLayout ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevationAndReversed [ | childrenIterator childrenIteratorReversed expectedOrder | @@ -441,7 +440,7 @@ BlChildrenSubsetTest >> testSortedByElevationAndReversed [ ^ childrenIteratorReversed ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevationFromElement [ | element sortedByElevationChildren | @@ -451,7 +450,7 @@ BlChildrenSubsetTest >> testSortedByElevationFromElement [ ^ sortedByElevationChildren ] -{ #category : 'tests' } +{ #category : #tests } BlChildrenSubsetTest >> testSortedByElevationTwice [ | childrenIterator childrenIteratorSortedByElevation | diff --git a/src/Bloc-UnitedTests/BlElementAttachmentTest.class.st b/src/Bloc-UnitedTests/BlElementAttachmentTest.class.st index 4e1a455c2..448f037df 100644 --- a/src/Bloc-UnitedTests/BlElementAttachmentTest.class.st +++ b/src/Bloc-UnitedTests/BlElementAttachmentTest.class.st @@ -3,18 +3,16 @@ I have been automatically converted and probably manually tweaked from BlElement Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlElementAttachmentTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #name : #BlElementAttachmentTest, + #superclass : #TestCase, + #category : #'Bloc-UnitedTests-Children' } -{ #category : 'tests' } +{ #category : #tests } BlElementAttachmentTest >> testAddToSpace [ | aSpace aContainer aChild addedToScene removedFromScene | - aSpace := BlOSpace new. + aSpace := BlSpace new. aChild := BlElement new. aContainer := BlElement new. aContainer addChild: aChild. @@ -34,7 +32,7 @@ BlElementAttachmentTest >> testAddToSpace [ do: [ :anEvent | removedFromScene add: anEvent currentTarget ]. self assert: aContainer isRemovedFromSceneGraph. self assert: aChild isRemovedFromSceneGraph. - aSpace addChild: aContainer. + aSpace root addChild: aContainer. self assert: aContainer isAttachedToSceneGraph. self assert: aChild isAttachedToSceneGraph. self @@ -46,7 +44,7 @@ BlElementAttachmentTest >> testAddToSpace [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementAttachmentTest >> testDetachAndAttachChild [ | aContainer aChild addedToScene removedFromScene | @@ -83,7 +81,7 @@ BlElementAttachmentTest >> testDetachAndAttachChild [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementAttachmentTest >> testDetachAndRemoveChild [ | aContainer aChild addedToScene removedFromScene | @@ -120,7 +118,7 @@ BlElementAttachmentTest >> testDetachAndRemoveChild [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementAttachmentTest >> testDetachAndRemoveContainer [ | aRoot aContainer aChild addedToScene removedFromScene | @@ -166,7 +164,7 @@ BlElementAttachmentTest >> testDetachAndRemoveContainer [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementAttachmentTest >> testDetachRequestFocusAndAttachChild [ | aContainer aChild focusEvents | diff --git a/src/Bloc-UnitedTests/BlElementBoundsTest.class.st b/src/Bloc-UnitedTests/BlElementBoundsTest.class.st index 1d8c26f77..2b005e632 100644 --- a/src/Bloc-UnitedTests/BlElementBoundsTest.class.st +++ b/src/Bloc-UnitedTests/BlElementBoundsTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlElement Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlElementBoundsTest', - #superclass : 'BlExampleTest', - #category : 'Bloc-UnitedTests-Bounds', - #package : 'Bloc-UnitedTests', - #tag : 'Bounds' + #name : #BlElementBoundsTest, + #superclass : #BlExampleTest, + #package : 'Bloc', + #tag : 'UnitedTests-Bounds' } -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementBoundsTest >> child [ ^ BlElement new @@ -19,17 +18,17 @@ BlElementBoundsTest >> child [ background: Color red ] -{ #category : 'helpers' } +{ #category : #helpers } BlElementBoundsTest >> childExtent [ ^ 100 @ 50 ] -{ #category : 'helpers' } +{ #category : #helpers } BlElementBoundsTest >> childPosition [ ^ 200 @ 150 ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementBoundsTest >> parent [ ^ BlElement new @@ -38,17 +37,17 @@ BlElementBoundsTest >> parent [ background: (Color gray alpha: 0.3) ] -{ #category : 'helpers' } +{ #category : #helpers } BlElementBoundsTest >> parentExtent [ ^ 500 @ 400 ] -{ #category : 'helpers' } +{ #category : #helpers } BlElementBoundsTest >> parentPosition [ ^ 100 @ 75 ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementBoundsTest >> parentWithChild [ ^ self parent @@ -56,7 +55,7 @@ BlElementBoundsTest >> parentWithChild [ forceLayout ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBounds [ "Element bounds consist of position and extent" @@ -73,7 +72,7 @@ BlElementBoundsTest >> testBounds [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInLocal [ "Bounds in local always have position 0@0" @@ -90,7 +89,7 @@ BlElementBoundsTest >> testBoundsInLocal [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInLocalInLocal [ @@ -106,7 +105,7 @@ BlElementBoundsTest >> testBoundsInLocalInLocal [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInLocalInParent [ @@ -128,7 +127,7 @@ BlElementBoundsTest >> testBoundsInLocalInParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInLocalInSpace [ @@ -150,7 +149,7 @@ BlElementBoundsTest >> testBoundsInLocalInSpace [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInParent [ @@ -168,7 +167,7 @@ BlElementBoundsTest >> testBoundsInParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInParentInLocal [ @@ -190,7 +189,7 @@ BlElementBoundsTest >> testBoundsInParentInLocal [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInParentInParent [ @@ -212,7 +211,7 @@ BlElementBoundsTest >> testBoundsInParentInParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInParentInParentInParent [ @@ -234,7 +233,7 @@ BlElementBoundsTest >> testBoundsInParentInParentInParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpace [ @@ -252,7 +251,7 @@ BlElementBoundsTest >> testBoundsInSpace [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpaceInLocal [ @@ -274,7 +273,7 @@ BlElementBoundsTest >> testBoundsInSpaceInLocal [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpaceInParent [ @@ -296,7 +295,7 @@ BlElementBoundsTest >> testBoundsInSpaceInParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpecificChild [ @@ -320,7 +319,7 @@ BlElementBoundsTest >> testBoundsInSpecificChild [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpecificChildInSpecificParent [ @@ -348,7 +347,7 @@ BlElementBoundsTest >> testBoundsInSpecificChildInSpecificParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpecificParent [ @@ -372,7 +371,7 @@ BlElementBoundsTest >> testBoundsInSpecificParent [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testBoundsInSpecificParentInSpecificChild [ @@ -400,7 +399,7 @@ BlElementBoundsTest >> testBoundsInSpecificParentInSpecificChild [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementBoundsTest >> testShadowEffectBoundsWithoutOffset [ diff --git a/src/Bloc-UnitedTests/BlElementChildrenTest.class.st b/src/Bloc-UnitedTests/BlElementChildrenTest.class.st index 89f92c632..e090a5e48 100644 --- a/src/Bloc-UnitedTests/BlElementChildrenTest.class.st +++ b/src/Bloc-UnitedTests/BlElementChildrenTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlElement Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlElementChildrenTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #name : #BlElementChildrenTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Children' } -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> hierarchyChildren [ @@ -35,7 +34,7 @@ BlElementChildrenTest >> hierarchyChildren [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> multipleChildren [ @@ -50,21 +49,21 @@ BlElementChildrenTest >> multipleChildren [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> multipleChildrenDepth2 [ ^ self multipleChildrenDepth: 2 ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> multipleChildrenDepth3 [ ^ self multipleChildrenDepth: 3 ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> multipleChildrenDepth: aDepth [ | aContainer | @@ -73,7 +72,7 @@ BlElementChildrenTest >> multipleChildrenDepth: aDepth [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> multipleChildrenIn: aContainer depth: aDepth [ @@ -91,7 +90,7 @@ BlElementChildrenTest >> multipleChildrenIn: aContainer depth: aDepth [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> overlappingChildren [ @@ -116,7 +115,7 @@ BlElementChildrenTest >> overlappingChildren [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllChildrenBreadthFirstWithDepthDo [ | aContainer allChildren founds all | @@ -145,7 +144,7 @@ BlElementChildrenTest >> testAllChildrenBreadthFirstWithDepthDo [ ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllLeafChildrenAt100200 [ | aContainer theChildren | @@ -155,7 +154,7 @@ BlElementChildrenTest >> testAllLeafChildrenAt100200 [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllLeafChildrenAt200100 [ | aContainer theChildren | @@ -165,7 +164,7 @@ BlElementChildrenTest >> testAllLeafChildrenAt200100 [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllLeafChildrenAt200200 [ | aContainer theChildren | @@ -177,7 +176,7 @@ BlElementChildrenTest >> testAllLeafChildrenAt200200 [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllLeafChildrenAt5050 [ | aContainer theChildren | @@ -187,7 +186,7 @@ BlElementChildrenTest >> testAllLeafChildrenAt5050 [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllLeafChildrenAt600600 [ | aContainer theChildren | @@ -197,7 +196,7 @@ BlElementChildrenTest >> testAllLeafChildrenAt600600 [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllParentsDetectifFoundifNone1 [ | aContainer aChild | @@ -219,7 +218,7 @@ BlElementChildrenTest >> testAllParentsDetectifFoundifNone1 [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllParentsDetectifFoundifNone2 [ | aContainer aChild | @@ -232,7 +231,7 @@ BlElementChildrenTest >> testAllParentsDetectifFoundifNone2 [ ifNone: [ self assert: false ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllParentsDo [ | aContainer aChild res | @@ -258,7 +257,7 @@ BlElementChildrenTest >> testAllParentsDo [ self assert: res asArray equals: { } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllParentsReversedDo [ | aContainer aChild all | @@ -282,7 +281,7 @@ BlElementChildrenTest >> testAllParentsReversedDo [ (aContainer childWithId: #shape_9) } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testAllParentsToDo [ | aContainer res | @@ -311,7 +310,7 @@ BlElementChildrenTest >> testAllParentsToDo [ aContainer } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildAt [ | aContainer | @@ -328,7 +327,7 @@ BlElementChildrenTest >> testChildAt [ ifFalse: [ self assert: false ] ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildIndexOf [ | aContainer aNonChild | @@ -347,7 +346,7 @@ BlElementChildrenTest >> testChildIndexOf [ self assert: (aContainer childIndexOf: aNonChild) equals: 0 ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithId [ | aContainer aChild1 aChild2 | @@ -372,7 +371,7 @@ BlElementChildrenTest >> testChildWithId [ self assert: false ] onErrorDo: [ :err | self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithId1 [ @@ -395,7 +394,7 @@ BlElementChildrenTest >> testChildWithId1 [ self assert: false ] onErrorDo: [ :err | self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithId2 [ @@ -421,7 +420,7 @@ BlElementChildrenTest >> testChildWithId2 [ self assert: false ] onErrorDo: [ :err | self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdIfFound1 [ | aContainer | @@ -440,7 +439,7 @@ BlElementChildrenTest >> testChildWithIdIfFound1 [ ifFound: [ self assert: false ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdIfFound2 [ | aContainer | @@ -459,7 +458,7 @@ BlElementChildrenTest >> testChildWithIdIfFound2 [ ifFound: [ self assert: false ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdIfFoundifNone1 [ | aContainer | @@ -482,7 +481,7 @@ BlElementChildrenTest >> testChildWithIdIfFoundifNone1 [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdIfFoundifNone2 [ | aContainer | @@ -505,7 +504,7 @@ BlElementChildrenTest >> testChildWithIdIfFoundifNone2 [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdifNone1 [ | aContainer | @@ -524,7 +523,7 @@ BlElementChildrenTest >> testChildWithIdifNone1 [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildWithIdifNone2 [ | aContainer | @@ -543,7 +542,7 @@ BlElementChildrenTest >> testChildWithIdifNone2 [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildren1 [ | aContainer allChildren | @@ -563,7 +562,7 @@ BlElementChildrenTest >> testChildren1 [ equals: (aContainer childWithId: #shape_10) ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildren2 [ | aContainer allChildren | @@ -577,7 +576,7 @@ BlElementChildrenTest >> testChildren2 [ equals: (aContainer childWithId: #shape_1) ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildrenCount1 [ | aContainer | @@ -585,7 +584,7 @@ BlElementChildrenTest >> testChildrenCount1 [ self assert: aContainer childrenCount equals: 10 ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testChildrenCount2 [ @@ -594,7 +593,7 @@ BlElementChildrenTest >> testChildrenCount2 [ self assert: aContainer childrenCount equals: 1 ] -{ #category : 'children - accessing' } +{ #category : #'children - accessing' } BlElementChildrenTest >> testDirectChildWithIdifFoundifNone [ | aContainer | @@ -613,7 +612,7 @@ BlElementChildrenTest >> testDirectChildWithIdifFoundifNone [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testFirstChild [ | aContainer anElementWithNoChild | @@ -628,7 +627,7 @@ BlElementChildrenTest >> testFirstChild [ self assert: false ] onErrorDo: [ :err | self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testFirstCommonParentifFoundifNone [ | aContainer aChild1 aChild2 | @@ -668,7 +667,7 @@ BlElementChildrenTest >> testFirstCommonParentifFoundifNone [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testHasChildren [ | aContainer | @@ -681,7 +680,7 @@ BlElementChildrenTest >> testHasChildren [ self assert: aContainer hasChildren. ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testIsFirstChild [ | aContainer aChild | @@ -704,7 +703,7 @@ BlElementChildrenTest >> testIsFirstChild [ self assert: false ] onErrorDo: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testIsLastChild [ | aContainer aChild | @@ -727,7 +726,7 @@ BlElementChildrenTest >> testIsLastChild [ self assert: false ] onErrorDo: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testNextSiblingDo [ | aContainer aChild | @@ -742,7 +741,7 @@ BlElementChildrenTest >> testNextSiblingDo [ aChild nextSiblingDo: [ :next | self assert: false ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testNextSiblingSuchThatdo [ | aContainer aChild | @@ -767,7 +766,7 @@ BlElementChildrenTest >> testNextSiblingSuchThatdo [ do: [ :next | self assert: false ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testOwner [ | aContainer | @@ -784,7 +783,7 @@ BlElementChildrenTest >> testOwner [ self assert: aContainer owner equals: nil ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testParentDo [ | aContainer aChild res | @@ -802,7 +801,7 @@ BlElementChildrenTest >> testParentDo [ self assert: res asArray equals: { } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testPreviousSiblingDo [ | aContainer aChild | @@ -817,7 +816,7 @@ BlElementChildrenTest >> testPreviousSiblingDo [ self assert: next equals: (aContainer childWithId: #shape_9) ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testPreviousSiblingSuchThatdo [ | aContainer aChild | @@ -842,7 +841,7 @@ BlElementChildrenTest >> testPreviousSiblingSuchThatdo [ self assert: next equals: (aContainer childWithId: #shape_8) ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testSiblingsDo [ | aContainer aChild found | @@ -866,7 +865,7 @@ BlElementChildrenTest >> testSiblingsDo [ ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testTopMostParent [ | aContainer aChild | @@ -875,7 +874,7 @@ BlElementChildrenTest >> testTopMostParent [ self assert: aChild topMostParent equals: aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testTopMostParentSuchThatifFoundifNone [ | aContainer aChild | @@ -891,7 +890,7 @@ BlElementChildrenTest >> testTopMostParentSuchThatifFoundifNone [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParents [ | aContainer aChild | @@ -911,7 +910,7 @@ BlElementChildrenTest >> testWithAllParents [ aContainer } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParentsDetectifFoundifNone [ | aContainer aChild | @@ -935,7 +934,7 @@ BlElementChildrenTest >> testWithAllParentsDetectifFoundifNone [ ifNone: [ self assert: true ] ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParentsDo [ | aContainer aChild res | @@ -962,7 +961,7 @@ BlElementChildrenTest >> testWithAllParentsDo [ self assert: res asArray equals: { aContainer } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParentsReversedDo [ | aContainer aChild all | @@ -987,7 +986,7 @@ BlElementChildrenTest >> testWithAllParentsReversedDo [ (aContainer childWithId: #shape_10) } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParentsUpToDo [ | aContainer res | @@ -1017,7 +1016,7 @@ BlElementChildrenTest >> testWithAllParentsUpToDo [ aContainer } ] -{ #category : 'tests' } +{ #category : #tests } BlElementChildrenTest >> testWithAllParentsUpTodetectifFoundIfNone [ | aContainer res | diff --git a/src/Bloc-UnitedTests/BlElementEventTest.class.st b/src/Bloc-UnitedTests/BlElementEventTest.class.st index 75ab842c6..5a4e67e88 100644 --- a/src/Bloc-UnitedTests/BlElementEventTest.class.st +++ b/src/Bloc-UnitedTests/BlElementEventTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlElement Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlElementEventTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Event', - #package : 'Bloc-UnitedTests', - #tag : 'Event' + #name : #BlElementEventTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Event' } -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementEventTest >> child [ @@ -19,7 +18,7 @@ BlElementEventTest >> child [ background: Color red ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementEventTest >> container [ @@ -31,7 +30,7 @@ BlElementEventTest >> container [ build) ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlElementEventTest >> parent [ @@ -40,7 +39,7 @@ BlElementEventTest >> parent [ background: (Color gray alpha: 0.3) ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testAddedToParent [ @@ -64,7 +63,7 @@ BlElementEventTest >> testAddedToParent [ ^ container ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testBackgroundChanged [ @@ -82,7 +81,7 @@ BlElementEventTest >> testBackgroundChanged [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testBorderChanged [ @@ -103,7 +102,7 @@ BlElementEventTest >> testBorderChanged [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testExtentChanged [ @@ -130,7 +129,7 @@ BlElementEventTest >> testExtentChanged [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testExtentChangedChangingWithTheSameSizeDoesNotRaiseEvent [ @@ -150,7 +149,7 @@ BlElementEventTest >> testExtentChangedChangingWithTheSameSizeDoesNotRaiseEvent ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testLayoutChanged [ @@ -168,7 +167,7 @@ BlElementEventTest >> testLayoutChanged [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testPositionChanged [ @@ -196,7 +195,7 @@ BlElementEventTest >> testPositionChanged [ ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testPositionChangedRelocatingOnSamePositionDoesNotRaiseEvent [ @@ -220,7 +219,7 @@ BlElementEventTest >> testPositionChangedRelocatingOnSamePositionDoesNotRaiseEve ^ parent ] -{ #category : 'tests' } +{ #category : #tests } BlElementEventTest >> testRemovedFromParent [ diff --git a/src/Bloc-UnitedTests/BlElementLayoutBoundaryTest.class.st b/src/Bloc-UnitedTests/BlElementLayoutBoundaryTest.class.st index fbc94d1e6..3184f5eef 100644 --- a/src/Bloc-UnitedTests/BlElementLayoutBoundaryTest.class.st +++ b/src/Bloc-UnitedTests/BlElementLayoutBoundaryTest.class.st @@ -3,14 +3,12 @@ I have been automatically converted and probably manually tweaked from BlElement Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlElementLayoutBoundaryTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Layout', - #package : 'Bloc-UnitedTests', - #tag : 'Layout' + #name : #BlElementLayoutBoundaryTest, + #superclass : #TestCase, + #category : #'Bloc-UnitedTests-Layout' } -{ #category : 'tests' } +{ #category : #tests } BlElementLayoutBoundaryTest >> testExactLayoutBoundary01Pulse [ @@ -34,7 +32,7 @@ BlElementLayoutBoundaryTest >> testExactLayoutBoundary01Pulse [ ^ aSpace ] -{ #category : 'tests' } +{ #category : #tests } BlElementLayoutBoundaryTest >> testExactLayoutBoundary02RequestLayoutChild [ | aSpace | @@ -60,11 +58,11 @@ BlElementLayoutBoundaryTest >> testExactLayoutBoundary02RequestLayoutChild [ ^ aSpace ] -{ #category : 'tests' } +{ #category : #tests } BlElementLayoutBoundaryTest >> testSpaceWithExactLayoutBoundary [ | aSpace aContainer aLayoutBoundary aChild | - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace extent: 500 @ 400. aContainer := BlElement new size: 400 @ 300. aLayoutBoundary := BlElement new size: 300 @ 200. diff --git a/src/Bloc-UnitedTests/BlElementWithBrokenDrawingAndOnLayoutMock.class.st b/src/Bloc-UnitedTests/BlElementWithBrokenDrawingAndOnLayoutMock.class.st index 8f7da470c..3325935e7 100644 --- a/src/Bloc-UnitedTests/BlElementWithBrokenDrawingAndOnLayoutMock.class.st +++ b/src/Bloc-UnitedTests/BlElementWithBrokenDrawingAndOnLayoutMock.class.st @@ -2,20 +2,19 @@ I am an element with broken drawing and onLayout methods " Class { - #name : 'BlElementWithBrokenDrawingAndOnLayoutMock', - #superclass : 'BlElement', - #category : 'Bloc-UnitedTests-Errors', - #package : 'Bloc-UnitedTests', - #tag : 'Errors' + #name : #BlElementWithBrokenDrawingAndOnLayoutMock, + #superclass : #BlElement, + #package : 'Bloc', + #tag : 'UnitedTests-Errors' } -{ #category : 'drawing' } +{ #category : #drawing } BlElementWithBrokenDrawingAndOnLayoutMock >> aeDrawOn: aCanvas [ 1 / 0 ] -{ #category : 'layout' } +{ #category : #layout } BlElementWithBrokenDrawingAndOnLayoutMock >> onLayout: aBounds context: aBlElementBoundsUpdater [ #() at: 1 ] diff --git a/src/Bloc-UnitedTests/BlElementWithBrokenDrawingMock.class.st b/src/Bloc-UnitedTests/BlElementWithBrokenDrawingMock.class.st index 336dc9d6b..456f6b9f6 100644 --- a/src/Bloc-UnitedTests/BlElementWithBrokenDrawingMock.class.st +++ b/src/Bloc-UnitedTests/BlElementWithBrokenDrawingMock.class.st @@ -2,14 +2,13 @@ I am an element with a broken drawing method that throws Error (ZeroDivide) " Class { - #name : 'BlElementWithBrokenDrawingMock', - #superclass : 'BlElement', - #category : 'Bloc-UnitedTests-Errors', - #package : 'Bloc-UnitedTests', - #tag : 'Errors' + #name : #BlElementWithBrokenDrawingMock, + #superclass : #BlElement, + #package : 'Bloc', + #tag : 'UnitedTests-Errors' } -{ #category : 'drawing' } +{ #category : #drawing } BlElementWithBrokenDrawingMock >> aeDrawOn: aCanvas [ 1 / 0 diff --git a/src/Bloc-UnitedTests/BlElementWithBrokenOnLayoutMock.class.st b/src/Bloc-UnitedTests/BlElementWithBrokenOnLayoutMock.class.st index de77d8ebb..14c0772e4 100644 --- a/src/Bloc-UnitedTests/BlElementWithBrokenOnLayoutMock.class.st +++ b/src/Bloc-UnitedTests/BlElementWithBrokenOnLayoutMock.class.st @@ -2,14 +2,13 @@ I am an element with a broken onLayout method that throws Error (SubscriptOutOfBounds) " Class { - #name : 'BlElementWithBrokenOnLayoutMock', - #superclass : 'BlElement', - #category : 'Bloc-UnitedTests-Errors', - #package : 'Bloc-UnitedTests', - #tag : 'Errors' + #name : #BlElementWithBrokenOnLayoutMock, + #superclass : #BlElement, + #package : 'Bloc', + #tag : 'UnitedTests-Errors' } -{ #category : 'layout' } +{ #category : #layout } BlElementWithBrokenOnLayoutMock >> onLayout: aBounds context: aBlElementBoundsUpdater [ #() at: 1 ] diff --git a/src/Bloc-UnitedTests/BlEllipseGeometryTest.class.st b/src/Bloc-UnitedTests/BlEllipseGeometryTest.class.st index f1384f67f..ce2d11bbb 100644 --- a/src/Bloc-UnitedTests/BlEllipseGeometryTest.class.st +++ b/src/Bloc-UnitedTests/BlEllipseGeometryTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlEllipse Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlEllipseGeometryTest', - #superclass : 'BlGeometryTest', - #category : 'Bloc-UnitedTests-Geometry', - #package : 'Bloc-UnitedTests', - #tag : 'Geometry' + #name : #BlEllipseGeometryTest, + #superclass : #BlGeometryTest, + #package : 'Bloc', + #tag : 'UnitedTests-Geometry' } -{ #category : 'tests' } +{ #category : #tests } BlEllipseGeometryTest >> testDefault [ diff --git a/src/Bloc-UnitedTests/BlErrorHandlingTest.class.st b/src/Bloc-UnitedTests/BlErrorHandlingTest.class.st index 591f036a4..124a20747 100644 --- a/src/Bloc-UnitedTests/BlErrorHandlingTest.class.st +++ b/src/Bloc-UnitedTests/BlErrorHandlingTest.class.st @@ -3,20 +3,19 @@ I have been automatically converted and probably manually tweaked from BlErrorHa Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlErrorHandlingTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Errors', - #package : 'Bloc-UnitedTests', - #tag : 'Errors' + #name : #BlErrorHandlingTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Errors' } -{ #category : 'metadata' } +{ #category : #metadata } BlErrorHandlingTest >> originClassName [ "This test was generated from..." ^ 'BlErrorHandlingExamples' ] -{ #category : 'fixture' } +{ #category : #fixture } BlErrorHandlingTest >> sceneWith: aFaultyElement [ "Create a visual scene with a faulty element embedded in it" @@ -80,7 +79,7 @@ BlErrorHandlingTest >> sceneWith: aFaultyElement [ ^ aContainer ] -{ #category : 'tests' } +{ #category : #tests } BlErrorHandlingTest >> testSceneElementThatHasBrokenDrawing [ @@ -104,7 +103,7 @@ BlErrorHandlingTest >> testSceneElementThatHasBrokenDrawing [ ^ aSceneElement ] -{ #category : 'tests' } +{ #category : #tests } BlErrorHandlingTest >> testSceneElementThatHasBrokenDrawingAndOnLayout [ @@ -136,7 +135,7 @@ BlErrorHandlingTest >> testSceneElementThatHasBrokenDrawingAndOnLayout [ ^ aSceneElement ] -{ #category : 'tests' } +{ #category : #tests } BlErrorHandlingTest >> testSceneElementThatHasBrokenOnLayout [ diff --git a/src/Bloc-UnitedTests/BlExamplesMock.class.st b/src/Bloc-UnitedTests/BlExamplesMock.class.st index aed04b687..94a3fb4ca 100644 --- a/src/Bloc-UnitedTests/BlExamplesMock.class.st +++ b/src/Bloc-UnitedTests/BlExamplesMock.class.st @@ -4,43 +4,42 @@ I define examples with the goal of demonstrating and testing my superclass. See my references. " Class { - #name : 'BlExamplesMock', - #superclass : 'BlExampleTest', + #name : #BlExamplesMock, + #superclass : #BlExampleTest, #instVars : [ 'enabled' ], - #category : 'Bloc-UnitedTests-Examples', - #package : 'Bloc-UnitedTests', - #tag : 'Examples' + #package : 'Bloc', + #tag : 'UnitedTests-Examples' } -{ #category : 'accessing' } +{ #category : #accessing } BlExamplesMock >> enableRunning [ enabled := true ] -{ #category : 'examples' } +{ #category : #examples } BlExamplesMock >> exampleError [ self error ] -{ #category : 'examples' } +{ #category : #examples } BlExamplesMock >> exampleFail [ self fail ] -{ #category : 'examples' } +{ #category : #examples } BlExamplesMock >> examplePass [ ] -{ #category : 'examples' } +{ #category : #examples } BlExamplesMock >> exampleSkip [ @@ -48,20 +47,20 @@ BlExamplesMock >> exampleSkip [ self error ] -{ #category : 'examples' } +{ #category : #examples } BlExamplesMock >> exampleWithArgument: arg [ ] -{ #category : 'initialization' } +{ #category : #initialization } BlExamplesMock >> initialize [ super initialize. enabled := false ] -{ #category : 'private' } +{ #category : #private } BlExamplesMock >> performTest [ enabled ifTrue: [ super performTest ] diff --git a/src/Bloc-UnitedTests/BlExamplesTest.class.st b/src/Bloc-UnitedTests/BlExamplesTest.class.st index 41a6fdc98..d82927708 100644 --- a/src/Bloc-UnitedTests/BlExamplesTest.class.st +++ b/src/Bloc-UnitedTests/BlExamplesTest.class.st @@ -2,9 +2,8 @@ Do not use this class we will remove it. " Class { - #name : 'BlExamplesTest', - #superclass : 'BlExampleTest', - #category : 'Bloc-UnitedTests-Examples', - #package : 'Bloc-UnitedTests', - #tag : 'Examples' + #name : #BlExamplesTest, + #superclass : #BlExampleTest, + #package : 'Bloc', + #tag : 'UnitedTests-Examples' } diff --git a/src/Bloc-UnitedTests/BlGeometryTest.class.st b/src/Bloc-UnitedTests/BlGeometryTest.class.st index 7af8d213e..60139aa4e 100644 --- a/src/Bloc-UnitedTests/BlGeometryTest.class.st +++ b/src/Bloc-UnitedTests/BlGeometryTest.class.st @@ -2,20 +2,19 @@ An AkGroupTest is a test class for testing the behavior of AkGroup " Class { - #name : 'BlGeometryTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Geometry', - #package : 'Bloc-UnitedTests', - #tag : 'Geometry' + #name : #BlGeometryTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Geometry' } -{ #category : 'testing' } +{ #category : #testing } BlGeometryTest class >> shouldInheritSelectors [ ^ true ] -{ #category : 'contains tests' } +{ #category : #'contains tests' } BlGeometryTest >> test3ElContainsPoint [ | g c1 c2 | @@ -48,7 +47,7 @@ BlGeometryTest >> test3ElContainsPoint [ self assert: (c1 containsPoint: 50 @ 50) ] -{ #category : 'any bounds tests' } +{ #category : #'any bounds tests' } BlGeometryTest >> testElAnyBounds [ | g c1 c2 | @@ -112,7 +111,7 @@ BlGeometryTest >> testElAnyBounds [ equals: (200 @ 200 corner: 400 @ 300) ] -{ #category : 'bounds tests' } +{ #category : #'bounds tests' } BlGeometryTest >> testElLocalAndGlobalBoundsConvertion [ | g | @@ -142,7 +141,7 @@ BlGeometryTest >> testElLocalAndGlobalBoundsConvertion [ equals: (10 @ 10 corner: 110 @ 110) ] -{ #category : 'position tests' } +{ #category : #'position tests' } BlGeometryTest >> testElLocalAndGlobalPostionConvertion [ | g n | @@ -166,7 +165,7 @@ BlGeometryTest >> testElLocalAndGlobalPostionConvertion [ self assert: (n parentPointToLocal: n position) equals: 0 @ 0 ] -{ #category : 'tx bounds tests' } +{ #category : #'tx bounds tests' } BlGeometryTest >> testElTxBounds [ | g n | diff --git a/src/Bloc-UnitedTests/BlHistogramGeometryTest.class.st b/src/Bloc-UnitedTests/BlHistogramGeometryTest.class.st index 6b9910f80..12f6653d8 100644 --- a/src/Bloc-UnitedTests/BlHistogramGeometryTest.class.st +++ b/src/Bloc-UnitedTests/BlHistogramGeometryTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlHistogr Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlHistogramGeometryTest', - #superclass : 'BlGeometryTest', - #category : 'Bloc-UnitedTests-Geometry', - #package : 'Bloc-UnitedTests', - #tag : 'Geometry' + #name : #BlHistogramGeometryTest, + #superclass : #BlGeometryTest, + #package : 'Bloc', + #tag : 'UnitedTests-Geometry' } -{ #category : 'tests' } +{ #category : #tests } BlHistogramGeometryTest >> testBottomToTop [ @@ -21,7 +20,7 @@ BlHistogramGeometryTest >> testBottomToTop [ ^ aHistogram ] -{ #category : 'tests' } +{ #category : #tests } BlHistogramGeometryTest >> testDefault [ @@ -41,7 +40,7 @@ BlHistogramGeometryTest >> testDefault [ ^ aHistogram ] -{ #category : 'tests' } +{ #category : #tests } BlHistogramGeometryTest >> testLeftToRight [ @@ -52,7 +51,7 @@ BlHistogramGeometryTest >> testLeftToRight [ ^ aHistogram ] -{ #category : 'tests' } +{ #category : #tests } BlHistogramGeometryTest >> testRightToLeft [ @@ -63,7 +62,7 @@ BlHistogramGeometryTest >> testRightToLeft [ ^ aHistogram ] -{ #category : 'tests' } +{ #category : #tests } BlHistogramGeometryTest >> testTopToBottom [ diff --git a/src/Bloc-UnitedTests/BlOpacityTest.class.st b/src/Bloc-UnitedTests/BlOpacityTest.class.st index b00f06eec..75897b9d2 100644 --- a/src/Bloc-UnitedTests/BlOpacityTest.class.st +++ b/src/Bloc-UnitedTests/BlOpacityTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlOpacity Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlOpacityTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Basic', - #package : 'Bloc-UnitedTests', - #tag : 'Basic' + #name : #BlOpacityTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Basic' } -{ #category : 'tests seed' } +{ #category : #'tests seed' } BlOpacityTest >> colorfulElement [ | anElement | @@ -33,7 +32,7 @@ BlOpacityTest >> colorfulElement [ ^ anElement ] -{ #category : 'tests' } +{ #category : #tests } BlOpacityTest >> testDefaultOpacity [ | anElement | @@ -45,7 +44,7 @@ BlOpacityTest >> testDefaultOpacity [ ^ anElement ] -{ #category : 'tests' } +{ #category : #tests } BlOpacityTest >> testMakeOpaque [ | anElement | @@ -58,7 +57,7 @@ BlOpacityTest >> testMakeOpaque [ ^ anElement ] -{ #category : 'tests' } +{ #category : #tests } BlOpacityTest >> testMakeTranslucent [ | anElement | @@ -71,7 +70,7 @@ BlOpacityTest >> testMakeTranslucent [ ^ anElement ] -{ #category : 'tests' } +{ #category : #tests } BlOpacityTest >> testMakeTransparent [ | anElement | diff --git a/src/Bloc-UnitedTests/BlSelectionHandlerTest.class.st b/src/Bloc-UnitedTests/BlSelectionHandlerTest.class.st index 05cb7f2e0..85f64bea2 100644 --- a/src/Bloc-UnitedTests/BlSelectionHandlerTest.class.st +++ b/src/Bloc-UnitedTests/BlSelectionHandlerTest.class.st @@ -3,46 +3,44 @@ I have been automatically converted and probably manually tweaked from BlSelecti Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlSelectionHandlerTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Selection', - #package : 'Bloc-UnitedTests', - #tag : 'Selection' + #name : #BlSelectionHandlerTest, + #superclass : #TestCase, + #category : #'Bloc-UnitedTests-Selection' } -{ #category : 'instance creation' } +{ #category : #'instance creation' } BlSelectionHandlerTest class >> grid [ + | space element | - element := self new testContainerWithOneGridAndVisualHandler. - space := BlOSpace new. + space := BlSpace new. space extent: 800@600. space root addChild: element. space show ] -{ #category : 'instance creation' } +{ #category : #'instance creation' } BlSelectionHandlerTest class >> gridRow [ + | space element | - element := self new testContainerWithThreeGridsAndVisualHandler. - space := BlOSpace new. + space := BlSpace new. space extent: 955@600. space root addChild: element. space show ] -{ #category : 'metadata' } +{ #category : #metadata } BlSelectionHandlerTest >> originClassName [ "This test was generated from..." ^ 'BlSelectionHandlerExamples' ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testCell [ ^ BlElement new @@ -58,7 +56,7 @@ BlSelectionHandlerTest >> testCell [ do: [ :anEvent | anEvent currentTarget border: BlBorder empty ] ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testContainer [ ^ BlElement new @@ -68,31 +66,31 @@ BlSelectionHandlerTest >> testContainer [ background: Color white ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testContainerWithOneGrid [ ^ self testContainer addChild: self testGridWith11Cells ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testContainerWithOneGridAndVisualHandler [ ^ self testContainerWithOneGrid addEventHandler: self testVisualHandler ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testContainerWithThreeGrids [ ^ self testContainer addChild: self testThreeGrids ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testContainerWithThreeGridsAndVisualHandler [ ^ self testContainerWithThreeGrids addEventHandler: self testVisualHandler ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testGrid [ ^ BlElement new @@ -107,7 +105,7 @@ BlSelectionHandlerTest >> testGrid [ rowCount: 5 ] ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testGridWith11Cells [ ^ self testGrid @@ -115,7 +113,7 @@ BlSelectionHandlerTest >> testGridWith11Cells [ yourself ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testThreeGrids [ ^ self testContainer @@ -127,7 +125,7 @@ BlSelectionHandlerTest >> testThreeGrids [ self testGridWith11Cells } ] -{ #category : 'smoke tests' } +{ #category : #'smoke tests' } BlSelectionHandlerTest >> testVisualHandler [ ^ BlVisualSelectionHandler new diff --git a/src/Bloc-UnitedTests/BlSelectionTest.class.st b/src/Bloc-UnitedTests/BlSelectionTest.class.st index 1ce5b5ee4..e1fff40d1 100644 --- a/src/Bloc-UnitedTests/BlSelectionTest.class.st +++ b/src/Bloc-UnitedTests/BlSelectionTest.class.st @@ -3,26 +3,25 @@ I have been automatically converted and probably manually tweaked from BlSelecti Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlSelectionTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Selection', - #package : 'Bloc-UnitedTests', - #tag : 'Selection' + #name : #BlSelectionTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Selection' } -{ #category : 'test seed' } +{ #category : #'test seed' } BlSelectionTest >> compositeSelection [ ^ BlCompositeSelection new ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSelectionTest >> monotoneSelection [ ^ BlMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom0To1 [ | aCompositeSelection | @@ -43,7 +42,7 @@ BlSelectionTest >> testCompositeSelectFrom0To1 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To1 [ | aCompositeSelection | @@ -59,7 +58,7 @@ BlSelectionTest >> testCompositeSelectFrom1To1 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To3 [ | aCompositeSelection | @@ -80,7 +79,7 @@ BlSelectionTest >> testCompositeSelectFrom1To3 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To3And2To6 [ | aCompositeSelection | @@ -102,7 +101,7 @@ BlSelectionTest >> testCompositeSelectFrom1To3And2To6 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To3And4To6 [ | aCompositeSelection | @@ -124,7 +123,7 @@ BlSelectionTest >> testCompositeSelectFrom1To3And4To6 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To3And5To6 [ | aCompositeSelection | @@ -146,7 +145,7 @@ BlSelectionTest >> testCompositeSelectFrom1To3And5To6 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom1To4And4To6 [ | aCompositeSelection | @@ -168,7 +167,7 @@ BlSelectionTest >> testCompositeSelectFrom1To4And4To6 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelectFrom5To6And1To3 [ | aCompositeSelection | @@ -190,13 +189,13 @@ BlSelectionTest >> testCompositeSelectFrom5To6And1To3 [ ^ aCompositeSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testCompositeSelection [ ^ BlCompositeSelection new ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneContainsIn1To1 [ | aMonotoneSelection | @@ -209,7 +208,7 @@ BlSelectionTest >> testMonotoneContainsIn1To1 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneContainsIndexIn1To1 [ | aMonotoneSelection | @@ -222,7 +221,7 @@ BlSelectionTest >> testMonotoneContainsIndexIn1To1 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneNeighbours1To1And3To4 [ | from1to1 from3to4 | @@ -235,7 +234,7 @@ BlSelectionTest >> testMonotoneNeighbours1To1And3To4 [ ^ from3to4 neighbours: from1to1 ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneNeighbours1To3And1To1 [ | from1to3 from1to1 | @@ -248,7 +247,7 @@ BlSelectionTest >> testMonotoneNeighbours1To3And1To1 [ ^ from1to3 neighbours: from1to1 ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneNeighbours1To3And3To4 [ | from1to3 from3to4 | @@ -261,7 +260,7 @@ BlSelectionTest >> testMonotoneNeighbours1To3And3To4 [ ^ from1to3 neighbours: from3to4 ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneNeighbours1To3And4To6 [ | from1to3 from4to6 | @@ -274,7 +273,7 @@ BlSelectionTest >> testMonotoneNeighbours1To3And4To6 [ ^ from1to3 neighbours: from4to6 ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneNeighbours1To4And4To6 [ | from1to4 from4to6 | @@ -287,7 +286,7 @@ BlSelectionTest >> testMonotoneNeighbours1To4And4To6 [ ^ from1to4 neighbours: from4to6 ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneRangeIncludesIn1To1 [ | aMonotoneSelection | @@ -300,7 +299,7 @@ BlSelectionTest >> testMonotoneRangeIncludesIn1To1 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneRangeIncludesIn1To3 [ | aMonotoneSelection | @@ -315,7 +314,7 @@ BlSelectionTest >> testMonotoneRangeIncludesIn1To3 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneRangeIncludesIn4To6 [ | aMonotoneSelection | @@ -333,7 +332,7 @@ BlSelectionTest >> testMonotoneRangeIncludesIn4To6 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneSelectFrom1To1 [ | aMonotoneSelection | @@ -350,7 +349,7 @@ BlSelectionTest >> testMonotoneSelectFrom1To1 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneSelectFrom1To3 [ | aMonotoneSelection | @@ -370,7 +369,7 @@ BlSelectionTest >> testMonotoneSelectFrom1To3 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneSelectFrom1To4 [ | aMonotoneSelection | @@ -390,7 +389,7 @@ BlSelectionTest >> testMonotoneSelectFrom1To4 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneSelectFrom3To4 [ | aMonotoneSelection | @@ -410,7 +409,7 @@ BlSelectionTest >> testMonotoneSelectFrom3To4 [ ^ aMonotoneSelection ] -{ #category : 'tests' } +{ #category : #tests } BlSelectionTest >> testMonotoneSelectFrom4To6 [ | aMonotoneSelection | diff --git a/src/Bloc-UnitedTests/BlSpace2Test.class.st b/src/Bloc-UnitedTests/BlSpace2Test.class.st index 76a6493ed..fd330a071 100644 --- a/src/Bloc-UnitedTests/BlSpace2Test.class.st +++ b/src/Bloc-UnitedTests/BlSpace2Test.class.st @@ -1,12 +1,10 @@ Class { - #name : 'BlSpace2Test', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Space', - #package : 'Bloc-UnitedTests', - #tag : 'Space' + #name : #BlSpace2Test, + #superclass : #TestCase, + #category : #'Bloc-UnitedTests-Space' } -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> animatedElement [ @@ -18,7 +16,7 @@ BlSpace2Test >> animatedElement [ yourself ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> iconElement [ @@ -28,7 +26,7 @@ BlSpace2Test >> iconElement [ geometry: BlCircleGeometry new ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> iconStencil [ @@ -38,7 +36,7 @@ BlSpace2Test >> iconStencil [ ^ aStencil ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> infiniteAnimation [ @@ -50,29 +48,29 @@ BlSpace2Test >> infiniteAnimation [ ^ anAnimation ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> spaceWithSlownDownTime [ - + | aTime aSpace | aTime := BlFastForwardedTime new. aTime speed: 0.2. - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace time: aTime. ^ aSpace ] -{ #category : 'test seed' } +{ #category : #'test seed' } BlSpace2Test >> spaceWithSlownDownTimeAndAnimatedElement [ - + | aSpace | aSpace := self spaceWithSlownDownTime. aSpace root addChild: self animatedElement. ^ aSpace ] -{ #category : 'tests' } +{ #category : #tests } BlSpace2Test >> testChangeIcon [ @@ -94,12 +92,12 @@ BlSpace2Test >> testChangeIcon [ ^ aSpace ] -{ #category : 'tests' } +{ #category : #tests } BlSpace2Test >> testEmptySpace [ | aSpace | - aSpace := BlOSpace new. + aSpace := BlSpace new. self assert: aSpace session equals: Smalltalk session. self deny: aSpace root hasChildren. self deny: aSpace hasDirtyElements. @@ -122,7 +120,7 @@ BlSpace2Test >> testEmptySpace [ ^ aSpace ] -{ #category : 'tests' } +{ #category : #tests } BlSpace2Test >> testFirstPulse [ diff --git a/src/Bloc-UnitedTests/BlSpaceIconDummyStencil2.class.st b/src/Bloc-UnitedTests/BlSpaceIconDummyStencil2.class.st index dca86b24a..2ff7fece2 100644 --- a/src/Bloc-UnitedTests/BlSpaceIconDummyStencil2.class.st +++ b/src/Bloc-UnitedTests/BlSpaceIconDummyStencil2.class.st @@ -1,26 +1,25 @@ Class { - #name : 'BlSpaceIconDummyStencil2', - #superclass : 'Object', + #name : #BlSpaceIconDummyStencil2, + #superclass : #Object, #instVars : [ 'block' ], - #category : 'Bloc-UnitedTests-Space', - #package : 'Bloc-UnitedTests', - #tag : 'Space' + #package : 'Bloc', + #tag : 'UnitedTests-Space' } -{ #category : 'api - converting' } +{ #category : #'api - converting' } BlSpaceIconDummyStencil2 >> asElement [ ^ self block value ] -{ #category : 'api - accessing' } +{ #category : #'api - accessing' } BlSpaceIconDummyStencil2 >> block [ ^ block ] -{ #category : 'api - accessing' } +{ #category : #'api - accessing' } BlSpaceIconDummyStencil2 >> block: anObject [ block := anObject ] diff --git a/src/Bloc-UnitedTests/BlTestOfExamplesTest.class.st b/src/Bloc-UnitedTests/BlTestOfExamplesTest.class.st index 19c41e0e6..e0da9b9f1 100644 --- a/src/Bloc-UnitedTests/BlTestOfExamplesTest.class.st +++ b/src/Bloc-UnitedTests/BlTestOfExamplesTest.class.st @@ -1,12 +1,11 @@ Class { - #name : 'BlTestOfExamplesTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Examples', - #package : 'Bloc-UnitedTests', - #tag : 'Examples' + #name : #BlTestOfExamplesTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Examples' } -{ #category : 'running' } +{ #category : #running } BlTestOfExamplesTest >> examplesTestResult [ | suite | @@ -15,7 +14,7 @@ BlTestOfExamplesTest >> examplesTestResult [ ^ suite run ] -{ #category : 'tests' } +{ #category : #tests } BlTestOfExamplesTest >> testAllExamplesAreConsideredTests [ self @@ -24,7 +23,7 @@ BlTestOfExamplesTest >> testAllExamplesAreConsideredTests [ ] -{ #category : 'tests' } +{ #category : #tests } BlTestOfExamplesTest >> testErrors [ self @@ -33,7 +32,7 @@ BlTestOfExamplesTest >> testErrors [ ] -{ #category : 'tests' } +{ #category : #tests } BlTestOfExamplesTest >> testFail [ self @@ -42,7 +41,7 @@ BlTestOfExamplesTest >> testFail [ ] -{ #category : 'tests' } +{ #category : #tests } BlTestOfExamplesTest >> testPass [ self @@ -51,7 +50,7 @@ BlTestOfExamplesTest >> testPass [ ] -{ #category : 'tests' } +{ #category : #tests } BlTestOfExamplesTest >> testSkip [ self diff --git a/src/Bloc-UnitedTests/BlTransformationTest.class.st b/src/Bloc-UnitedTests/BlTransformationTest.class.st index 52b9b4799..a4fb02e3f 100644 --- a/src/Bloc-UnitedTests/BlTransformationTest.class.st +++ b/src/Bloc-UnitedTests/BlTransformationTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlTransfo Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlTransformationTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Math', - #package : 'Bloc-UnitedTests', - #tag : 'Math' + #name : #BlTransformationTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Math' } -{ #category : 'test seeds' } +{ #category : #'test seeds' } BlTransformationTest >> element [ ^ BlElement new @@ -20,17 +19,17 @@ BlTransformationTest >> element [ "to compute extent and position"forceLayout ] -{ #category : 'hooks' } +{ #category : #hooks } BlTransformationTest >> extent [ ^ 100 @ 100 ] -{ #category : 'hooks' } +{ #category : #hooks } BlTransformationTest >> position [ ^ 100 @ 100 ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testElTxBoundsWithScale [ | g n | @@ -66,7 +65,7 @@ BlTransformationTest >> testElTxBoundsWithScale [ equals: ((100 @ 100) negated extent: 400 @ 400) ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testInheritFromIdentity [ | n | @@ -88,7 +87,7 @@ BlTransformationTest >> testInheritFromIdentity [ equals: ((50 @ 50) negated corner: 150 @ 150) ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testReflection [ | element | @@ -104,7 +103,7 @@ BlTransformationTest >> testReflection [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testRotate [ | element expectedOrigin expectedExtent | @@ -129,7 +128,7 @@ BlTransformationTest >> testRotate [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testScale [ | element expectedOrigin expectedExtent | @@ -152,7 +151,7 @@ BlTransformationTest >> testScale [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testScaleBy [ | n | @@ -180,7 +179,7 @@ BlTransformationTest >> testScaleBy [ self assert: n transformedBounds equals: (0 @ 0 corner: 100 @ 100) ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testScaleTo [ | n | @@ -206,7 +205,7 @@ BlTransformationTest >> testScaleTo [ self assert: n transformedBounds equals: (25 @ 25 corner: 75 @ 75) ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testTranslate [ | element expectedOrigin expectedExtent | @@ -229,7 +228,7 @@ BlTransformationTest >> testTranslate [ ^ element ] -{ #category : 'tests' } +{ #category : #tests } BlTransformationTest >> testTranslateTo [ | n | diff --git a/src/Bloc-UnitedTests/BlVectorTest.class.st b/src/Bloc-UnitedTests/BlVectorTest.class.st index 6dfcaf63d..a1f8cf8d0 100644 --- a/src/Bloc-UnitedTests/BlVectorTest.class.st +++ b/src/Bloc-UnitedTests/BlVectorTest.class.st @@ -3,14 +3,13 @@ I have been automatically converted and probably manually tweaked from BlVector2 Finally and more important such tests should not use setup because every method should be in capacity of returning a fully working object called an example :) " Class { - #name : 'BlVectorTest', - #superclass : 'TestCase', - #category : 'Bloc-UnitedTests-Math', - #package : 'Bloc-UnitedTests', - #tag : 'Math' + #name : #BlVectorTest, + #superclass : #TestCase, + #package : 'Bloc', + #tag : 'UnitedTests-Math' } -{ #category : 'tests - conversions' } +{ #category : #'tests - conversions' } BlVectorTest >> testAsBlocVector [ | v | @@ -20,7 +19,7 @@ BlVectorTest >> testAsBlocVector [ self assert: v y equals: 10. ] -{ #category : 'tests - conversions' } +{ #category : #'tests - conversions' } BlVectorTest >> testAsBlocVectorNumber [ | v | @@ -30,7 +29,7 @@ BlVectorTest >> testAsBlocVectorNumber [ self assert: v y equals: 10. ] -{ #category : 'tests - conversions' } +{ #category : #'tests - conversions' } BlVectorTest >> testAsBlocVectorPoint [ | v | @@ -40,7 +39,7 @@ BlVectorTest >> testAsBlocVectorPoint [ self assert: v y equals: 20. ] -{ #category : 'tests - maths' } +{ #category : #'tests - maths' } BlVectorTest >> testNormal [ | v norm | @@ -51,7 +50,7 @@ BlVectorTest >> testNormal [ self assert: (v asPoint crossProduct: norm asPoint) equals: 1 ] -{ #category : 'tests - conversions' } +{ #category : #'tests - conversions' } BlVectorTest >> testSign [ | signVector | @@ -60,7 +59,7 @@ BlVectorTest >> testSign [ self assert: signVector y equals: -1. ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testSingleton [ | singletonSelectors | @@ -76,7 +75,7 @@ BlVectorTest >> testSingleton [ ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testVector0degrees [ | aVector | @@ -86,7 +85,7 @@ BlVectorTest >> testVector0degrees [ ^ aVector ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testVector180degrees [ | aVector | @@ -96,7 +95,7 @@ BlVectorTest >> testVector180degrees [ ^ aVector ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testVector270degrees [ | aVector | @@ -106,7 +105,7 @@ BlVectorTest >> testVector270degrees [ ^ aVector ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector2DAddition [ | aVector anotherVector sum | @@ -118,7 +117,7 @@ BlVectorTest >> testVector2DAddition [ ^ sum ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector2DAdditionWith3D [ | aVector anotherVector sum | @@ -131,7 +130,7 @@ BlVectorTest >> testVector2DAdditionWith3D [ ^ sum ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector2DMultiplication [ | aVector mul | @@ -142,7 +141,7 @@ BlVectorTest >> testVector2DMultiplication [ ^ mul ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector2DMultiplicationConstantFirst [ | aVector mul | @@ -153,7 +152,7 @@ BlVectorTest >> testVector2DMultiplicationConstantFirst [ ^ mul ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testVector346degrees [ | aVector | @@ -169,7 +168,7 @@ BlVectorTest >> testVector346degrees [ ^ aVector ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector3DAddition [ | aVector anotherVector sum | @@ -182,7 +181,7 @@ BlVectorTest >> testVector3DAddition [ ^ sum ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector3DAdditionWith2D [ | aVector anotherVector sum | @@ -195,7 +194,7 @@ BlVectorTest >> testVector3DAdditionWith2D [ ^ sum ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVector3DMultiplication [ | aVector mul | @@ -207,7 +206,7 @@ BlVectorTest >> testVector3DMultiplication [ ^ mul ] -{ #category : 'tests' } +{ #category : #tests } BlVectorTest >> testVector45degrees [ | aVector | @@ -220,7 +219,7 @@ BlVectorTest >> testVector45degrees [ ^ aVector ] -{ #category : 'tests - arithmetic' } +{ #category : #'tests - arithmetic' } BlVectorTest >> testVectorMultiplicationConstantFirst [ | aVector mul | diff --git a/src/Bloc-UnitedTests/TBlChildrenTest.trait.st b/src/Bloc-UnitedTests/TBlChildrenTest.trait.st index 17f29be33..2b1ae0c79 100644 --- a/src/Bloc-UnitedTests/TBlChildrenTest.trait.st +++ b/src/Bloc-UnitedTests/TBlChildrenTest.trait.st @@ -1,11 +1,9 @@ Trait { - #name : 'TBlChildrenTest', - #category : 'Bloc-UnitedTests-Children', - #package : 'Bloc-UnitedTests', - #tag : 'Children' + #name : #TBlChildrenTest, + #category : 'Bloc-UnitedTests-Children' } -{ #category : 'fixture' } +{ #category : #fixture } TBlChildrenTest >> fill: aNumber [ | childrenArray | @@ -15,7 +13,7 @@ TBlChildrenTest >> fill: aNumber [ ^ childrenArray ] -{ #category : 'fixture' } +{ #category : #fixture } TBlChildrenTest >> newChildAt: anIndex [ | anElement | @@ -24,14 +22,14 @@ TBlChildrenTest >> newChildAt: anIndex [ ^ anElement ] -{ #category : 'fixture' } +{ #category : #fixture } TBlChildrenTest >> newChildrenCollection [ "Instantiate the type of children collection under test" ^ self explicitRequirement ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAdd [ @@ -48,7 +46,7 @@ TBlChildrenTest >> testAdd [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAddAt [ @@ -73,7 +71,7 @@ TBlChildrenTest >> testAddAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAsArray [ | theChildren indices | @@ -84,7 +82,7 @@ TBlChildrenTest >> testAsArray [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAsArrayEmpty [ | theChildren indices | @@ -95,7 +93,7 @@ TBlChildrenTest >> testAsArrayEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAt [ | theChildren | @@ -108,7 +106,7 @@ TBlChildrenTest >> testAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testAtIfAbsent [ | theChildren | @@ -133,7 +131,7 @@ TBlChildrenTest >> testAtIfAbsent [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testEmptyChildren [ | theChildren | @@ -144,7 +142,7 @@ TBlChildrenTest >> testEmptyChildren [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testFirst [ | theChildren | @@ -153,7 +151,7 @@ TBlChildrenTest >> testFirst [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIfEmpty [ | theChildren | @@ -162,7 +160,7 @@ TBlChildrenTest >> testIfEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIfEmptyNot [ | theChildren | @@ -171,7 +169,7 @@ TBlChildrenTest >> testIfEmptyNot [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIndexOf [ | theChildren | @@ -181,7 +179,7 @@ TBlChildrenTest >> testIndexOf [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIndexOfUnknown [ | theChildren | @@ -190,7 +188,7 @@ TBlChildrenTest >> testIndexOfUnknown [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIsEmpty [ | theChildren | @@ -201,7 +199,7 @@ TBlChildrenTest >> testIsEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testIsNotEmpty [ | theChildren | @@ -212,7 +210,7 @@ TBlChildrenTest >> testIsNotEmpty [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testLast [ | theChildren | @@ -221,7 +219,7 @@ TBlChildrenTest >> testLast [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testRemove [ | theChildren indices | @@ -233,7 +231,7 @@ TBlChildrenTest >> testRemove [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testRemoveAll [ | theChildren indices | @@ -248,7 +246,7 @@ TBlChildrenTest >> testRemoveAll [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testRemoveAt [ | theChildren indices | @@ -262,7 +260,7 @@ TBlChildrenTest >> testRemoveAt [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testSecond [ | theChildren | @@ -271,7 +269,7 @@ TBlChildrenTest >> testSecond [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testSize [ | theChildren | @@ -280,7 +278,7 @@ TBlChildrenTest >> testSize [ ^ theChildren ] -{ #category : 'tests' } +{ #category : #tests } TBlChildrenTest >> testSizeEmpty [ | theChildren | diff --git a/src/Bloc-UnitedTests/package.st b/src/Bloc-UnitedTests/package.st index 8902989e3..24e2ab4c4 100644 --- a/src/Bloc-UnitedTests/package.st +++ b/src/Bloc-UnitedTests/package.st @@ -1 +1 @@ -Package { #name : 'Bloc-UnitedTests' } +Package { #name : #'Bloc-UnitedTests' } diff --git a/src/Bloc/AtomicSharedPriorityQueue.class.st b/src/Bloc/AtomicSharedPriorityQueue.class.st index e3fffee1d..da1747aab 100644 --- a/src/Bloc/AtomicSharedPriorityQueue.class.st +++ b/src/Bloc/AtomicSharedPriorityQueue.class.st @@ -27,7 +27,6 @@ Internal Representation and Key Implementation Points. Class { #name : 'AtomicSharedPriorityQueue', #superclass : 'AtomicSharedQueue', - #category : 'Bloc-DataStructure - Priority Queue', #package : 'Bloc', #tag : 'DataStructure - Priority Queue' } diff --git a/src/Bloc/BlActionHandler.class.st b/src/Bloc/BlActionHandler.class.st index 90df7fba1..4c2197fe5 100644 --- a/src/Bloc/BlActionHandler.class.st +++ b/src/Bloc/BlActionHandler.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlAffineCompositeTransformation.class.st b/src/Bloc/BlAffineCompositeTransformation.class.st index 6c578fd06..826ca6a9d 100644 --- a/src/Bloc/BlAffineCompositeTransformation.class.st +++ b/src/Bloc/BlAffineCompositeTransformation.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'transformations' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformation.class.st b/src/Bloc/BlAffineTransformation.class.st index 5956b7594..12df01c1f 100644 --- a/src/Bloc/BlAffineTransformation.class.st +++ b/src/Bloc/BlAffineTransformation.class.st @@ -11,7 +11,6 @@ Class { #instVars : [ 'origin' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationCenterOrigin.class.st b/src/Bloc/BlAffineTransformationCenterOrigin.class.st index 2153993dc..5053665cb 100644 --- a/src/Bloc/BlAffineTransformationCenterOrigin.class.st +++ b/src/Bloc/BlAffineTransformationCenterOrigin.class.st @@ -8,7 +8,6 @@ Class { #classInstVars : [ 'defaultInstance' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationLeftCenterOrigin.class.st b/src/Bloc/BlAffineTransformationLeftCenterOrigin.class.st index 2f14d6255..493cdf5c6 100644 --- a/src/Bloc/BlAffineTransformationLeftCenterOrigin.class.st +++ b/src/Bloc/BlAffineTransformationLeftCenterOrigin.class.st @@ -5,7 +5,6 @@ I am a relative transformation origin which is attached to the left center of an Class { #name : 'BlAffineTransformationLeftCenterOrigin', #superclass : 'BlAffineTransformationOrigin', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationNormalizedPositionOrigin.class.st b/src/Bloc/BlAffineTransformationNormalizedPositionOrigin.class.st index 712bb2264..c721edb21 100644 --- a/src/Bloc/BlAffineTransformationNormalizedPositionOrigin.class.st +++ b/src/Bloc/BlAffineTransformationNormalizedPositionOrigin.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'position' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationOrigin.class.st b/src/Bloc/BlAffineTransformationOrigin.class.st index d9f9be13c..fa8d2e2a7 100644 --- a/src/Bloc/BlAffineTransformationOrigin.class.st +++ b/src/Bloc/BlAffineTransformationOrigin.class.st @@ -6,7 +6,6 @@ I can be very useful when users want to rotate / scale or shear an element about Class { #name : 'BlAffineTransformationOrigin', #superclass : 'Object', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationPositionOrigin.class.st b/src/Bloc/BlAffineTransformationPositionOrigin.class.st index 885592de2..ea0f38482 100644 --- a/src/Bloc/BlAffineTransformationPositionOrigin.class.st +++ b/src/Bloc/BlAffineTransformationPositionOrigin.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'position' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationRightCenterOrigin.class.st b/src/Bloc/BlAffineTransformationRightCenterOrigin.class.st index 44efd2b36..9bed867b6 100644 --- a/src/Bloc/BlAffineTransformationRightCenterOrigin.class.st +++ b/src/Bloc/BlAffineTransformationRightCenterOrigin.class.st @@ -5,7 +5,6 @@ I am a relative transformation origin which is attached to the right center of a Class { #name : 'BlAffineTransformationRightCenterOrigin', #superclass : 'BlAffineTransformationOrigin', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAffineTransformationTopLeftOrigin.class.st b/src/Bloc/BlAffineTransformationTopLeftOrigin.class.st index 9c61ffaff..67557aafe 100644 --- a/src/Bloc/BlAffineTransformationTopLeftOrigin.class.st +++ b/src/Bloc/BlAffineTransformationTopLeftOrigin.class.st @@ -5,7 +5,6 @@ I am a relative transformation origin which is attached to the top left of an el Class { #name : 'BlAffineTransformationTopLeftOrigin', #superclass : 'BlAffineTransformationOrigin', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlAliasCursor.class.st b/src/Bloc/BlAliasCursor.class.st index 18f755713..1d441914f 100644 --- a/src/Bloc/BlAliasCursor.class.st +++ b/src/Bloc/BlAliasCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlAliasCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlAllScrollCursor.class.st b/src/Bloc/BlAllScrollCursor.class.st index 19ba477b3..dd67ae627 100644 --- a/src/Bloc/BlAllScrollCursor.class.st +++ b/src/Bloc/BlAllScrollCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlAllScrollCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlAlreadyAddedAsChildError.class.st b/src/Bloc/BlAlreadyAddedAsChildError.class.st index ebff6ad66..382ccdb6a 100644 --- a/src/Bloc/BlAlreadyAddedAsChildError.class.st +++ b/src/Bloc/BlAlreadyAddedAsChildError.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'element' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlAlternativeCombination.class.st b/src/Bloc/BlAlternativeCombination.class.st index d16d75b39..7adab85ba 100644 --- a/src/Bloc/BlAlternativeCombination.class.st +++ b/src/Bloc/BlAlternativeCombination.class.st @@ -25,7 +25,6 @@ Class { #instVars : [ 'combinations' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlAnnulusSector.class.st b/src/Bloc/BlAnnulusSector.class.st index cd7274143..872d45dac 100644 --- a/src/Bloc/BlAnnulusSector.class.st +++ b/src/Bloc/BlAnnulusSector.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlAnnulusSector', #superclass : 'BlAnnulusSectorGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlAnnulusSectorGeometry.class.st b/src/Bloc/BlAnnulusSectorGeometry.class.st index 1c07b7612..6cc82b34b 100644 --- a/src/Bloc/BlAnnulusSectorGeometry.class.st +++ b/src/Bloc/BlAnnulusSectorGeometry.class.st @@ -13,7 +13,6 @@ Class { 'innerRadius', 'outerRadius' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlArrayObjectPool.class.st b/src/Bloc/BlArrayObjectPool.class.st index d26ae9f93..201719594 100644 --- a/src/Bloc/BlArrayObjectPool.class.st +++ b/src/Bloc/BlArrayObjectPool.class.st @@ -5,7 +5,6 @@ Class { 'poolSize', 'pool' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlArrowCursor.class.st b/src/Bloc/BlArrowCursor.class.st index abc81ea93..138ca7078 100644 --- a/src/Bloc/BlArrowCursor.class.st +++ b/src/Bloc/BlArrowCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlArrowCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlAttachedCachedSpaceReference.class.st b/src/Bloc/BlAttachedCachedSpaceReference.class.st index 676277941..d7b38a220 100644 --- a/src/Bloc/BlAttachedCachedSpaceReference.class.st +++ b/src/Bloc/BlAttachedCachedSpaceReference.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlAttachedSpaceReference.class.st b/src/Bloc/BlAttachedSpaceReference.class.st index 1b8263478..464263388 100644 --- a/src/Bloc/BlAttachedSpaceReference.class.st +++ b/src/Bloc/BlAttachedSpaceReference.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlAttributeRope.class.st b/src/Bloc/BlAttributeRope.class.st index 5212c9803..705304b6a 100644 --- a/src/Bloc/BlAttributeRope.class.st +++ b/src/Bloc/BlAttributeRope.class.st @@ -10,7 +10,6 @@ Class { 'attributes', 'rope' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlAttributeRopeIterator.class.st b/src/Bloc/BlAttributeRopeIterator.class.st index 32673254a..df9d131f9 100644 --- a/src/Bloc/BlAttributeRopeIterator.class.st +++ b/src/Bloc/BlAttributeRopeIterator.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'subIterator' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlBackground.class.st b/src/Bloc/BlBackground.class.st index d749fc811..575d33013 100644 --- a/src/Bloc/BlBackground.class.st +++ b/src/Bloc/BlBackground.class.st @@ -24,7 +24,6 @@ Class { #instVars : [ 'opacity' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlBackgroundBuilder.class.st b/src/Bloc/BlBackgroundBuilder.class.st index 3696517e7..8273aea66 100644 --- a/src/Bloc/BlBackgroundBuilder.class.st +++ b/src/Bloc/BlBackgroundBuilder.class.st @@ -6,7 +6,6 @@ Class { #instVars : [ 'opacity' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlBagObjectPool.class.st b/src/Bloc/BlBagObjectPool.class.st index 45490fb58..a584de4ac 100644 --- a/src/Bloc/BlBagObjectPool.class.st +++ b/src/Bloc/BlBagObjectPool.class.st @@ -10,7 +10,6 @@ Class { 'maxPoolSize', 'pool' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlBaseDragEvent.class.st b/src/Bloc/BlBaseDragEvent.class.st index ffaa79cbc..554e8bee8 100644 --- a/src/Bloc/BlBaseDragEvent.class.st +++ b/src/Bloc/BlBaseDragEvent.class.st @@ -7,7 +7,6 @@ Class { 'dragboard', 'startButtons' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlBaseEventProcessor.class.st b/src/Bloc/BlBaseEventProcessor.class.st index 19dfdf38e..4c6644a69 100644 --- a/src/Bloc/BlBaseEventProcessor.class.st +++ b/src/Bloc/BlBaseEventProcessor.class.st @@ -6,7 +6,6 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlBaseFocusEvent.class.st b/src/Bloc/BlBaseFocusEvent.class.st index 4a98ec4d9..e0386ea83 100644 --- a/src/Bloc/BlBaseFocusEvent.class.st +++ b/src/Bloc/BlBaseFocusEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'reason' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlBasicEventHandler.class.st b/src/Bloc/BlBasicEventHandler.class.st index 5f8a05ecb..c55073f21 100644 --- a/src/Bloc/BlBasicEventHandler.class.st +++ b/src/Bloc/BlBasicEventHandler.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlBasicLayout.class.st b/src/Bloc/BlBasicLayout.class.st index 5aaf780bd..c5b3def6c 100644 --- a/src/Bloc/BlBasicLayout.class.st +++ b/src/Bloc/BlBasicLayout.class.st @@ -8,7 +8,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlBasicNodeBasedLayout.class.st b/src/Bloc/BlBasicNodeBasedLayout.class.st index a250e7739..4b2225b60 100644 --- a/src/Bloc/BlBasicNodeBasedLayout.class.st +++ b/src/Bloc/BlBasicNodeBasedLayout.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBasicNodeBasedLayout', #superclass : 'BlNodeBasedLayout', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlBasicShortcut.class.st b/src/Bloc/BlBasicShortcut.class.st index 79d9101d5..e922b68cf 100644 --- a/src/Bloc/BlBasicShortcut.class.st +++ b/src/Bloc/BlBasicShortcut.class.st @@ -22,7 +22,6 @@ Class { 'combination', 'repeatable' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlBeaconLoggingTask.class.st b/src/Bloc/BlBeaconLoggingTask.class.st index c1df62256..aff8d74e2 100644 --- a/src/Bloc/BlBeaconLoggingTask.class.st +++ b/src/Bloc/BlBeaconLoggingTask.class.st @@ -13,7 +13,6 @@ Class { 'subtask', 'callingMethod' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlBeaconTaskSignal.class.st b/src/Bloc/BlBeaconTaskSignal.class.st index 9441fe813..6b57b1ac5 100644 --- a/src/Bloc/BlBeaconTaskSignal.class.st +++ b/src/Bloc/BlBeaconTaskSignal.class.st @@ -12,7 +12,6 @@ Class { 'callingMethod', 'message' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlBezierCurve.class.st b/src/Bloc/BlBezierCurve.class.st index 35f5cb2cc..f1b568d93 100644 --- a/src/Bloc/BlBezierCurve.class.st +++ b/src/Bloc/BlBezierCurve.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBezierCurve', #superclass : 'BlBezierCurveGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlBezierCurveGeometry.class.st b/src/Bloc/BlBezierCurveGeometry.class.st index fd9344ab2..77ecc122a 100644 --- a/src/Bloc/BlBezierCurveGeometry.class.st +++ b/src/Bloc/BlBezierCurveGeometry.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'controlPoints' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlBitflags.class.st b/src/Bloc/BlBitflags.class.st index caf8cb04d..402a710a7 100644 --- a/src/Bloc/BlBitflags.class.st +++ b/src/Bloc/BlBitflags.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'value' ], - #category : 'Bloc-DataStructure - Bitflags', #package : 'Bloc', #tag : 'DataStructure - Bitflags' } diff --git a/src/Bloc/BlBlurAboveEffect.class.st b/src/Bloc/BlBlurAboveEffect.class.st index 787cd69af..63d8eea8b 100644 --- a/src/Bloc/BlBlurAboveEffect.class.st +++ b/src/Bloc/BlBlurAboveEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBlurAboveEffect', #superclass : 'BlBlurEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlBlurBelowEffect.class.st b/src/Bloc/BlBlurBelowEffect.class.st index 133d31b21..83779d0d2 100644 --- a/src/Bloc/BlBlurBelowEffect.class.st +++ b/src/Bloc/BlBlurBelowEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBlurBelowEffect', #superclass : 'BlBlurEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlBlurEffect.class.st b/src/Bloc/BlBlurEffect.class.st index ff0ab4550..1c8f8f72b 100644 --- a/src/Bloc/BlBlurEffect.class.st +++ b/src/Bloc/BlBlurEffect.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'radius' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlBlurEvent.class.st b/src/Bloc/BlBlurEvent.class.st index ae7d51635..c29518fed 100644 --- a/src/Bloc/BlBlurEvent.class.st +++ b/src/Bloc/BlBlurEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBlurEvent', #superclass : 'BlBaseFocusEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlBorder.class.st b/src/Bloc/BlBorder.class.st index 46d429ffa..c99428400 100644 --- a/src/Bloc/BlBorder.class.st +++ b/src/Bloc/BlBorder.class.st @@ -23,7 +23,6 @@ Class { #classInstVars : [ 'empty' ], - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlBorderBuilder.class.st b/src/Bloc/BlBorderBuilder.class.st index bd9197f4f..5854aabc9 100644 --- a/src/Bloc/BlBorderBuilder.class.st +++ b/src/Bloc/BlBorderBuilder.class.st @@ -22,7 +22,6 @@ Class { 'dashOffset', 'opacity' ], - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlBottomAlignment.class.st b/src/Bloc/BlBottomAlignment.class.st index eed8ddbc1..02f4c4440 100644 --- a/src/Bloc/BlBottomAlignment.class.st +++ b/src/Bloc/BlBottomAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBottomAlignment', #superclass : 'BlVerticalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlBounds.class.st b/src/Bloc/BlBounds.class.st index 6c543a674..d806c721f 100644 --- a/src/Bloc/BlBounds.class.st +++ b/src/Bloc/BlBounds.class.st @@ -12,7 +12,6 @@ Class { 'right', 'bottom' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlBoundsCache.class.st b/src/Bloc/BlBoundsCache.class.st index 0613aa46c..ad96a7d17 100644 --- a/src/Bloc/BlBoundsCache.class.st +++ b/src/Bloc/BlBoundsCache.class.st @@ -12,7 +12,6 @@ Class { 'geometryBoundsInSpace', 'invalidationBounds' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlBoundsMatcher.class.st b/src/Bloc/BlBoundsMatcher.class.st index 79719e350..6c476f903 100644 --- a/src/Bloc/BlBoundsMatcher.class.st +++ b/src/Bloc/BlBoundsMatcher.class.st @@ -14,7 +14,6 @@ Class { 'childStart', 'childEnd' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlBoundsMatcherConstraints.class.st b/src/Bloc/BlBoundsMatcherConstraints.class.st index 3cce9a689..fa5b19d4c 100644 --- a/src/Bloc/BlBoundsMatcherConstraints.class.st +++ b/src/Bloc/BlBoundsMatcherConstraints.class.st @@ -23,7 +23,6 @@ Class { 'LessThan', 'Mask' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlBubblingEventDispatcher.class.st b/src/Bloc/BlBubblingEventDispatcher.class.st index e1a4a9fbf..0ca3a2621 100644 --- a/src/Bloc/BlBubblingEventDispatcher.class.st +++ b/src/Bloc/BlBubblingEventDispatcher.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlBubblingEventDispatcher', #superclass : 'BlDirectEventDispatcher', - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlCellCursor.class.st b/src/Bloc/BlCellCursor.class.st index 5ba38ae1e..dba6b3ddf 100644 --- a/src/Bloc/BlCellCursor.class.st +++ b/src/Bloc/BlCellCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCellCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlChildBoundsBasedFinder.class.st b/src/Bloc/BlChildBoundsBasedFinder.class.st index 20693e104..f35aa7f9e 100644 --- a/src/Bloc/BlChildBoundsBasedFinder.class.st +++ b/src/Bloc/BlChildBoundsBasedFinder.class.st @@ -13,7 +13,6 @@ Class { 'preferredConstraints', 'acceptableConstraints' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlChildDoesNotExistError.class.st b/src/Bloc/BlChildDoesNotExistError.class.st index 2b618a10a..0ff187604 100644 --- a/src/Bloc/BlChildDoesNotExistError.class.st +++ b/src/Bloc/BlChildDoesNotExistError.class.st @@ -5,7 +5,6 @@ Class { 'parent', 'child' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlChildren.class.st b/src/Bloc/BlChildren.class.st index 5cbb678e0..27313a587 100644 --- a/src/Bloc/BlChildren.class.st +++ b/src/Bloc/BlChildren.class.st @@ -25,7 +25,6 @@ Class { #superclass : 'Collection', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenAccountedByLayout.class.st b/src/Bloc/BlChildrenAccountedByLayout.class.st index e2b484364..16f366a96 100644 --- a/src/Bloc/BlChildrenAccountedByLayout.class.st +++ b/src/Bloc/BlChildrenAccountedByLayout.class.st @@ -8,7 +8,6 @@ I represent a subset of children that are accounted (not ignored) by layout. Class { #name : 'BlChildrenAccountedByLayout', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenArray.class.st b/src/Bloc/BlChildrenArray.class.st index 42d81d97c..5c883cab1 100644 --- a/src/Bloc/BlChildrenArray.class.st +++ b/src/Bloc/BlChildrenArray.class.st @@ -14,7 +14,6 @@ Class { #instVars : [ 'array' ], - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenCollection.class.st b/src/Bloc/BlChildrenCollection.class.st index 81167ef5d..fc5476a60 100644 --- a/src/Bloc/BlChildrenCollection.class.st +++ b/src/Bloc/BlChildrenCollection.class.st @@ -19,7 +19,6 @@ Subclasses need to provide the implementation for methods adding and removing ch Class { #name : 'BlChildrenCollection', #superclass : 'BlChildren', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenIgnoredByLayout.class.st b/src/Bloc/BlChildrenIgnoredByLayout.class.st index 6862033b2..e9778c127 100644 --- a/src/Bloc/BlChildrenIgnoredByLayout.class.st +++ b/src/Bloc/BlChildrenIgnoredByLayout.class.st @@ -7,7 +7,6 @@ I represent a subset of children that are ignored by layout. Class { #name : 'BlChildrenIgnoredByLayout', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenLinkedList.class.st b/src/Bloc/BlChildrenLinkedList.class.st index 22679ee3a..9d0b4e48e 100644 --- a/src/Bloc/BlChildrenLinkedList.class.st +++ b/src/Bloc/BlChildrenLinkedList.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'list' ], - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenOrderedCollection.class.st b/src/Bloc/BlChildrenOrderedCollection.class.st index 0a3ffed7b..6da18205e 100644 --- a/src/Bloc/BlChildrenOrderedCollection.class.st +++ b/src/Bloc/BlChildrenOrderedCollection.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'collection' ], - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenReversed.class.st b/src/Bloc/BlChildrenReversed.class.st index fad4f8eab..07d8aef11 100644 --- a/src/Bloc/BlChildrenReversed.class.st +++ b/src/Bloc/BlChildrenReversed.class.st @@ -8,7 +8,6 @@ I reverse an underlying collection of children. Class { #name : 'BlChildrenReversed', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenRope.class.st b/src/Bloc/BlChildrenRope.class.st index c1edb40d1..e495089f3 100644 --- a/src/Bloc/BlChildrenRope.class.st +++ b/src/Bloc/BlChildrenRope.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'rope' ], - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenSortedByElevation.class.st b/src/Bloc/BlChildrenSortedByElevation.class.st index f4da89d94..cf605763d 100644 --- a/src/Bloc/BlChildrenSortedByElevation.class.st +++ b/src/Bloc/BlChildrenSortedByElevation.class.st @@ -8,7 +8,6 @@ I sort a collection of children by elevation in ascending order. Class { #name : 'BlChildrenSortedByElevation', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenSortedByElevationReversed.class.st b/src/Bloc/BlChildrenSortedByElevationReversed.class.st index 0c1fa4255..b860d2f8a 100644 --- a/src/Bloc/BlChildrenSortedByElevationReversed.class.st +++ b/src/Bloc/BlChildrenSortedByElevationReversed.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlChildrenSortedByElevationReversed', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenSortedByPerimeter.class.st b/src/Bloc/BlChildrenSortedByPerimeter.class.st index b12c37c03..b2dd33abf 100644 --- a/src/Bloc/BlChildrenSortedByPerimeter.class.st +++ b/src/Bloc/BlChildrenSortedByPerimeter.class.st @@ -5,7 +5,6 @@ I sort a collection of children by perimeter in ascending order. Class { #name : 'BlChildrenSortedByPerimeter', #superclass : 'BlChildrenSubset', - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlChildrenSubset.class.st b/src/Bloc/BlChildrenSubset.class.st index fa90540c3..99dedf215 100644 --- a/src/Bloc/BlChildrenSubset.class.st +++ b/src/Bloc/BlChildrenSubset.class.st @@ -26,7 +26,6 @@ Class { 'subsetArray', 'supersetChildren' ], - #category : 'Bloc-Basic-Children', #package : 'Bloc', #tag : 'Basic-Children' } diff --git a/src/Bloc/BlCircle.class.st b/src/Bloc/BlCircle.class.st index 1cc02c59a..baac39d74 100644 --- a/src/Bloc/BlCircle.class.st +++ b/src/Bloc/BlCircle.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCircle', #superclass : 'BlCircleGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlCircleGeometry.class.st b/src/Bloc/BlCircleGeometry.class.st index 138e235cd..60382023b 100644 --- a/src/Bloc/BlCircleGeometry.class.st +++ b/src/Bloc/BlCircleGeometry.class.st @@ -5,7 +5,6 @@ Class { 'radius', 'origin' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlClickAvortedEvent.class.st b/src/Bloc/BlClickAvortedEvent.class.st index cce842427..9c0590390 100644 --- a/src/Bloc/BlClickAvortedEvent.class.st +++ b/src/Bloc/BlClickAvortedEvent.class.st @@ -5,7 +5,6 @@ Class { 'processor', 'upEvent' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlClickEvent.class.st b/src/Bloc/BlClickEvent.class.st index ed0c888db..54dd20f6e 100644 --- a/src/Bloc/BlClickEvent.class.st +++ b/src/Bloc/BlClickEvent.class.st @@ -11,7 +11,6 @@ The order of fired events: Class { #name : 'BlClickEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlClipOutEffect.class.st b/src/Bloc/BlClipOutEffect.class.st index 0e5d28735..6ef4bfb0c 100644 --- a/src/Bloc/BlClipOutEffect.class.st +++ b/src/Bloc/BlClipOutEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlClipOutEffect', #superclass : 'BlElementEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlClipOutGeometryEffect.class.st b/src/Bloc/BlClipOutGeometryEffect.class.st index 588f6331f..ef0c900e1 100644 --- a/src/Bloc/BlClipOutGeometryEffect.class.st +++ b/src/Bloc/BlClipOutGeometryEffect.class.st @@ -9,7 +9,6 @@ Class { 'geometry', 'offset' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlClipOutInsetsEffect.class.st b/src/Bloc/BlClipOutInsetsEffect.class.st index a2885f623..02cddbad5 100644 --- a/src/Bloc/BlClipOutInsetsEffect.class.st +++ b/src/Bloc/BlClipOutInsetsEffect.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'insets' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlCollectionRope.class.st b/src/Bloc/BlCollectionRope.class.st index 2c5d09778..63b4039b4 100644 --- a/src/Bloc/BlCollectionRope.class.st +++ b/src/Bloc/BlCollectionRope.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'collection' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlCollectionRopeIterator.class.st b/src/Bloc/BlCollectionRopeIterator.class.st index 4cd7b5bbb..c6cb610cc 100644 --- a/src/Bloc/BlCollectionRopeIterator.class.st +++ b/src/Bloc/BlCollectionRopeIterator.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'position' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlColorPaint.class.st b/src/Bloc/BlColorPaint.class.st index ee4332f0e..314a0469f 100644 --- a/src/Bloc/BlColorPaint.class.st +++ b/src/Bloc/BlColorPaint.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'color' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlCompositeAlignment.class.st b/src/Bloc/BlCompositeAlignment.class.st index 32f2a329d..b4f3d76cb 100644 --- a/src/Bloc/BlCompositeAlignment.class.st +++ b/src/Bloc/BlCompositeAlignment.class.st @@ -6,7 +6,6 @@ Class { 'horizontal', 'direction' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlCompositeBackground.class.st b/src/Bloc/BlCompositeBackground.class.st index 10acabf4c..53f5ec9e3 100644 --- a/src/Bloc/BlCompositeBackground.class.st +++ b/src/Bloc/BlCompositeBackground.class.st @@ -29,7 +29,6 @@ Class { #instVars : [ 'backgrounds' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlCompositeBackgroundBuilder.class.st b/src/Bloc/BlCompositeBackgroundBuilder.class.st index b3b3a9fc2..4cf00416e 100644 --- a/src/Bloc/BlCompositeBackgroundBuilder.class.st +++ b/src/Bloc/BlCompositeBackgroundBuilder.class.st @@ -11,7 +11,6 @@ Class { 'backgrounds', 'builders' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlCompositeEffect.class.st b/src/Bloc/BlCompositeEffect.class.st index 2c6116077..2f98c60d1 100644 --- a/src/Bloc/BlCompositeEffect.class.st +++ b/src/Bloc/BlCompositeEffect.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'effects' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlCompositeErrorHandler.class.st b/src/Bloc/BlCompositeErrorHandler.class.st index e628f0d77..d00b8e03c 100644 --- a/src/Bloc/BlCompositeErrorHandler.class.st +++ b/src/Bloc/BlCompositeErrorHandler.class.st @@ -5,7 +5,6 @@ Class { 'errors', 'errorHandlers' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlCompositeSelection.class.st b/src/Bloc/BlCompositeSelection.class.st index fe4334def..5730673fe 100644 --- a/src/Bloc/BlCompositeSelection.class.st +++ b/src/Bloc/BlCompositeSelection.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'selections' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlCompositingMode.class.st b/src/Bloc/BlCompositingMode.class.st index 9ebc67358..94a32fd82 100644 --- a/src/Bloc/BlCompositingMode.class.st +++ b/src/Bloc/BlCompositingMode.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCompositingSeparateLayerMode.class.st b/src/Bloc/BlCompositingSeparateLayerMode.class.st index 52a04f123..aab959fef 100644 --- a/src/Bloc/BlCompositingSeparateLayerMode.class.st +++ b/src/Bloc/BlCompositingSeparateLayerMode.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCompositingSeparateLayerMode', #superclass : 'BlCompositingWithLayerMode', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCompositingSingleLayerMode.class.st b/src/Bloc/BlCompositingSingleLayerMode.class.st index f6274f431..827323fc5 100644 --- a/src/Bloc/BlCompositingSingleLayerMode.class.st +++ b/src/Bloc/BlCompositingSingleLayerMode.class.st @@ -6,7 +6,6 @@ This may be useful for complex elements that rarely change, for example visualis Class { #name : 'BlCompositingSingleLayerMode', #superclass : 'BlCompositingWithLayerMode', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCompositingWithLayerMode.class.st b/src/Bloc/BlCompositingWithLayerMode.class.st index 09c702267..741d26792 100644 --- a/src/Bloc/BlCompositingWithLayerMode.class.st +++ b/src/Bloc/BlCompositingWithLayerMode.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCompositingWithLayerMode', #superclass : 'BlCompositingMode', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCompositingWithoutLayerMode.class.st b/src/Bloc/BlCompositingWithoutLayerMode.class.st index 8bc3da893..5f535c163 100644 --- a/src/Bloc/BlCompositingWithoutLayerMode.class.st +++ b/src/Bloc/BlCompositingWithoutLayerMode.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCompositingWithoutLayerMode', #superclass : 'BlCompositingMode', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCompulsoryCombination.class.st b/src/Bloc/BlCompulsoryCombination.class.st index c955a2202..abc645ab1 100644 --- a/src/Bloc/BlCompulsoryCombination.class.st +++ b/src/Bloc/BlCompulsoryCombination.class.st @@ -23,7 +23,6 @@ Class { #instVars : [ 'combinations' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlConcatenationRope.class.st b/src/Bloc/BlConcatenationRope.class.st index 314f06864..7b83b7517 100644 --- a/src/Bloc/BlConcatenationRope.class.st +++ b/src/Bloc/BlConcatenationRope.class.st @@ -10,7 +10,6 @@ Class { 'right', 'length' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlConcatenationRopeIterator.class.st b/src/Bloc/BlConcatenationRopeIterator.class.st index 57c29eb5f..ed428ba45 100644 --- a/src/Bloc/BlConcatenationRopeIterator.class.st +++ b/src/Bloc/BlConcatenationRopeIterator.class.st @@ -9,7 +9,6 @@ Class { 'position', 'currentIterator' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlContextMenuCursor.class.st b/src/Bloc/BlContextMenuCursor.class.st index 754a1675e..61cd9b871 100644 --- a/src/Bloc/BlContextMenuCursor.class.st +++ b/src/Bloc/BlContextMenuCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlContextMenuCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlCopyCursor.class.st b/src/Bloc/BlCopyCursor.class.st index d6eedc71e..8adeae097 100644 --- a/src/Bloc/BlCopyCursor.class.st +++ b/src/Bloc/BlCopyCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCopyCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlCornerRadii.class.st b/src/Bloc/BlCornerRadii.class.st index 7b298c51f..eb1def4a7 100644 --- a/src/Bloc/BlCornerRadii.class.st +++ b/src/Bloc/BlCornerRadii.class.st @@ -20,7 +20,6 @@ Class { #classInstVars : [ 'empty' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlCosineInterpolator.class.st b/src/Bloc/BlCosineInterpolator.class.st index 3fc16c643..d7b884117 100644 --- a/src/Bloc/BlCosineInterpolator.class.st +++ b/src/Bloc/BlCosineInterpolator.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'range' ], - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlCrosshairCursor.class.st b/src/Bloc/BlCrosshairCursor.class.st index b8361e58c..36d614be0 100644 --- a/src/Bloc/BlCrosshairCursor.class.st +++ b/src/Bloc/BlCrosshairCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlCrosshairCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlCursor.class.st b/src/Bloc/BlCursor.class.st index aec70e555..c3e77dc0b 100644 --- a/src/Bloc/BlCursor.class.st +++ b/src/Bloc/BlCursor.class.st @@ -9,7 +9,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlCustomEventHandler.class.st b/src/Bloc/BlCustomEventHandler.class.st index 6e1142793..5855b52cf 100644 --- a/src/Bloc/BlCustomEventHandler.class.st +++ b/src/Bloc/BlCustomEventHandler.class.st @@ -6,7 +6,6 @@ Then for each interesting event a user should implement a corresponding event ha Class { #name : 'BlCustomEventHandler', #superclass : 'BlBasicEventHandler', - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlCustomVisuals.class.st b/src/Bloc/BlCustomVisuals.class.st index c94f5e6af..22daf3bcc 100644 --- a/src/Bloc/BlCustomVisuals.class.st +++ b/src/Bloc/BlCustomVisuals.class.st @@ -30,7 +30,6 @@ Class { 'focused', 'mouseCursor' ], - #category : 'Bloc-Basic', #package : 'Bloc', #tag : 'Basic' } diff --git a/src/Bloc/BlDecelerateInterpolator.class.st b/src/Bloc/BlDecelerateInterpolator.class.st index 47b99ca64..93ac183f0 100644 --- a/src/Bloc/BlDecelerateInterpolator.class.st +++ b/src/Bloc/BlDecelerateInterpolator.class.st @@ -15,7 +15,6 @@ Class { #instVars : [ 'factor' ], - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlDefaultCursor.class.st b/src/Bloc/BlDefaultCursor.class.st index 71e08b83d..2921eb5ad 100644 --- a/src/Bloc/BlDefaultCursor.class.st +++ b/src/Bloc/BlDefaultCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDefaultCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlDefaultVisuals.class.st b/src/Bloc/BlDefaultVisuals.class.st index 0feab408f..80d15779f 100644 --- a/src/Bloc/BlDefaultVisuals.class.st +++ b/src/Bloc/BlDefaultVisuals.class.st @@ -50,7 +50,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic', #package : 'Bloc', #tag : 'Basic' } diff --git a/src/Bloc/BlDelayPulsesTask.class.st b/src/Bloc/BlDelayPulsesTask.class.st index b1eeb2f43..739eddd00 100644 --- a/src/Bloc/BlDelayPulsesTask.class.st +++ b/src/Bloc/BlDelayPulsesTask.class.st @@ -24,7 +24,6 @@ Class { 'count', 'requeue' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlDelayedPulsesTaskAction.class.st b/src/Bloc/BlDelayedPulsesTaskAction.class.st index bb0d1cfe7..26ad21c23 100644 --- a/src/Bloc/BlDelayedPulsesTaskAction.class.st +++ b/src/Bloc/BlDelayedPulsesTaskAction.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'action' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlDelayedTask.class.st b/src/Bloc/BlDelayedTask.class.st index 3e7f7f0e1..ec9d0c839 100644 --- a/src/Bloc/BlDelayedTask.class.st +++ b/src/Bloc/BlDelayedTask.class.st @@ -29,7 +29,6 @@ Class { 'startTime', 'requeue' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlDelayedTaskAction.class.st b/src/Bloc/BlDelayedTaskAction.class.st index dd5fe8bcf..84b69c735 100644 --- a/src/Bloc/BlDelayedTaskAction.class.st +++ b/src/Bloc/BlDelayedTaskAction.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'action' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlDetachedSpaceReference.class.st b/src/Bloc/BlDetachedSpaceReference.class.st index f4fa28bc2..27a264d43 100644 --- a/src/Bloc/BlDetachedSpaceReference.class.st +++ b/src/Bloc/BlDetachedSpaceReference.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlDirectEventDispatcher.class.st b/src/Bloc/BlDirectEventDispatcher.class.st index 7e295d422..e6643ddaf 100644 --- a/src/Bloc/BlDirectEventDispatcher.class.st +++ b/src/Bloc/BlDirectEventDispatcher.class.st @@ -18,7 +18,6 @@ Class { 'handlers', 'shortcutHandler' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlDoubleClickEvent.class.st b/src/Bloc/BlDoubleClickEvent.class.st index 06c42ec53..f184c31c1 100644 --- a/src/Bloc/BlDoubleClickEvent.class.st +++ b/src/Bloc/BlDoubleClickEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDoubleClickEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDragEndEvent.class.st b/src/Bloc/BlDragEndEvent.class.st index aeec5970c..da021e64b 100644 --- a/src/Bloc/BlDragEndEvent.class.st +++ b/src/Bloc/BlDragEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDragEndEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDragEnterEvent.class.st b/src/Bloc/BlDragEnterEvent.class.st index 878239113..80ee0cf59 100644 --- a/src/Bloc/BlDragEnterEvent.class.st +++ b/src/Bloc/BlDragEnterEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDragEnterEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDragEvent.class.st b/src/Bloc/BlDragEvent.class.st index 37b1acf45..0208ffc46 100644 --- a/src/Bloc/BlDragEvent.class.st +++ b/src/Bloc/BlDragEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDragEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDragLeaveEvent.class.st b/src/Bloc/BlDragLeaveEvent.class.st index 2f5d9fa6d..79a757cec 100644 --- a/src/Bloc/BlDragLeaveEvent.class.st +++ b/src/Bloc/BlDragLeaveEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDragLeaveEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDragStartEvent.class.st b/src/Bloc/BlDragStartEvent.class.st index c58e576ba..9aa650391 100644 --- a/src/Bloc/BlDragStartEvent.class.st +++ b/src/Bloc/BlDragStartEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDragStartEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlDrawingErrorHandler.class.st b/src/Bloc/BlDrawingErrorHandler.class.st index 33b907804..11dab5fa5 100644 --- a/src/Bloc/BlDrawingErrorHandler.class.st +++ b/src/Bloc/BlDrawingErrorHandler.class.st @@ -7,7 +7,6 @@ To not completely break the UI thread we should catch the error and prevent the Class { #name : 'BlDrawingErrorHandler', #superclass : 'BlSingleErrorHandler', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlDropEvent.class.st b/src/Bloc/BlDropEvent.class.st index c5ed10232..759d9d037 100644 --- a/src/Bloc/BlDropEvent.class.st +++ b/src/Bloc/BlDropEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlDropEvent', #superclass : 'BlBaseDragEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEasing.class.st b/src/Bloc/BlEasing.class.st index 6b097fa61..b155129b0 100644 --- a/src/Bloc/BlEasing.class.st +++ b/src/Bloc/BlEasing.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasing', #superclass : 'BlInterpolator', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingBaseBounce.class.st b/src/Bloc/BlEasingBaseBounce.class.st index 630491327..db38aca14 100644 --- a/src/Bloc/BlEasingBaseBounce.class.st +++ b/src/Bloc/BlEasingBaseBounce.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingBaseBounce', #superclass : 'BlEasing', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingBounceIn.class.st b/src/Bloc/BlEasingBounceIn.class.st index c2ad0666e..1ab08b5dd 100644 --- a/src/Bloc/BlEasingBounceIn.class.st +++ b/src/Bloc/BlEasingBounceIn.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingBounceIn', #superclass : 'BlEasingBaseBounce', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingBounceInOut.class.st b/src/Bloc/BlEasingBounceInOut.class.st index 2d4a3fe68..01348b4b9 100644 --- a/src/Bloc/BlEasingBounceInOut.class.st +++ b/src/Bloc/BlEasingBounceInOut.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingBounceInOut', #superclass : 'BlEasingBaseBounce', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingBounceOut.class.st b/src/Bloc/BlEasingBounceOut.class.st index 2f72fcccb..34a54d4a5 100644 --- a/src/Bloc/BlEasingBounceOut.class.st +++ b/src/Bloc/BlEasingBounceOut.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingBounceOut', #superclass : 'BlEasingBaseBounce', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingElastic.class.st b/src/Bloc/BlEasingElastic.class.st index 32d3c5196..c3e37f533 100644 --- a/src/Bloc/BlEasingElastic.class.st +++ b/src/Bloc/BlEasingElastic.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingElastic', #superclass : 'BlEasing', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlEasingQuad.class.st b/src/Bloc/BlEasingQuad.class.st index 68190e74a..a4911c6f4 100644 --- a/src/Bloc/BlEasingQuad.class.st +++ b/src/Bloc/BlEasingQuad.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEasingQuad', #superclass : 'BlEasing', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlElement.class.st b/src/Bloc/BlElement.class.st index dc157d37c..3375788f9 100644 --- a/src/Bloc/BlElement.class.st +++ b/src/Bloc/BlElement.class.st @@ -63,11 +63,10 @@ Class { 'errorHandler', 'userData', 'visuals', - 'flags' + 'flags', + 'figure' ], - #category : 'Bloc-Basic', - #package : 'Bloc', - #tag : 'Basic' + #category : #'Bloc-Basic' } { #category : 'instance creation' } @@ -3052,10 +3051,11 @@ BlElement >> opacity: aNumber [ BlElement >> openInNewSpace [ "Add self to a new BlSpace and show it. Answer such space." - ^ BlOSpace new - addChild: self; - show; - yourself + | aSpace | + aSpace := BlSpace new. + aSpace root addChild: self. + aSpace show. + ^ aSpace ] { #category : 'convenience' } @@ -3803,10 +3803,11 @@ BlElement >> size: aPoint [ { #category : 'accessing' } BlElement >> space [ - "Return space to which I belong. Direct reference boosts performance. + "Return space to which I belong, or nil of I don't belong to any space. + Direct reference boosts performance. Each element has a reference to the current space which is set on demand." - + self flag: #todo. "Don't return nil!" spaceReference spaceDo: [ :aSpace | ^ aSpace ]. spaceReference isAttachedToSceneGraph diff --git a/src/Bloc/BlElementAbsoluteTransformation.class.st b/src/Bloc/BlElementAbsoluteTransformation.class.st index f3f841453..fea5cac3e 100644 --- a/src/Bloc/BlElementAbsoluteTransformation.class.st +++ b/src/Bloc/BlElementAbsoluteTransformation.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'matrix' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementAddedToParentEvent.class.st b/src/Bloc/BlElementAddedToParentEvent.class.st index 61d3e4f66..4b223c312 100644 --- a/src/Bloc/BlElementAddedToParentEvent.class.st +++ b/src/Bloc/BlElementAddedToParentEvent.class.st @@ -19,7 +19,6 @@ parent addChild: child. Class { #name : 'BlElementAddedToParentEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementAddedToSceneGraphEvent.class.st b/src/Bloc/BlElementAddedToSceneGraphEvent.class.st index 198fcfc77..6931f1415 100644 --- a/src/Bloc/BlElementAddedToSceneGraphEvent.class.st +++ b/src/Bloc/BlElementAddedToSceneGraphEvent.class.st @@ -5,7 +5,6 @@ I inform that an element was attached to a scene. I can be added to any Bloc ele Class { #name : 'BlElementAddedToSceneGraphEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementAlignment.class.st b/src/Bloc/BlElementAlignment.class.st index fb1942164..c77ca4ba3 100644 --- a/src/Bloc/BlElementAlignment.class.st +++ b/src/Bloc/BlElementAlignment.class.st @@ -26,7 +26,6 @@ Class { 'start', 'vertical' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlElementBackgroundChangedEvent.class.st b/src/Bloc/BlElementBackgroundChangedEvent.class.st index b465de0bb..bc57e19f7 100644 --- a/src/Bloc/BlElementBackgroundChangedEvent.class.st +++ b/src/Bloc/BlElementBackgroundChangedEvent.class.st @@ -15,7 +15,6 @@ element background: Color blue Class { #name : 'BlElementBackgroundChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementBackgroundProperty.class.st b/src/Bloc/BlElementBackgroundProperty.class.st index 8952138bf..a4fb6c02b 100644 --- a/src/Bloc/BlElementBackgroundProperty.class.st +++ b/src/Bloc/BlElementBackgroundProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'background' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementBorderChangedEvent.class.st b/src/Bloc/BlElementBorderChangedEvent.class.st index 0b390430c..93c406ee2 100644 --- a/src/Bloc/BlElementBorderChangedEvent.class.st +++ b/src/Bloc/BlElementBorderChangedEvent.class.st @@ -15,7 +15,6 @@ element border: (BlBorder paint: Color blue width: 20) Class { #name : 'BlElementBorderChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementBorderProperty.class.st b/src/Bloc/BlElementBorderProperty.class.st index c2713f146..bad62cc46 100644 --- a/src/Bloc/BlElementBorderProperty.class.st +++ b/src/Bloc/BlElementBorderProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'border' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementBounds.class.st b/src/Bloc/BlElementBounds.class.st index f39ec7f8f..f62d00a18 100644 --- a/src/Bloc/BlElementBounds.class.st +++ b/src/Bloc/BlElementBounds.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'referenceElement' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsInChild.class.st b/src/Bloc/BlElementBoundsInChild.class.st index a349e719b..0acbb1eda 100644 --- a/src/Bloc/BlElementBoundsInChild.class.st +++ b/src/Bloc/BlElementBoundsInChild.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'originalElement' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsInLocal.class.st b/src/Bloc/BlElementBoundsInLocal.class.st index 4955265a0..a20bfd4dd 100644 --- a/src/Bloc/BlElementBoundsInLocal.class.st +++ b/src/Bloc/BlElementBoundsInLocal.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementBoundsInLocal', #superclass : 'BlElementComputedBounds', - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsInParent.class.st b/src/Bloc/BlElementBoundsInParent.class.st index ad7c13313..0711af9fc 100644 --- a/src/Bloc/BlElementBoundsInParent.class.st +++ b/src/Bloc/BlElementBoundsInParent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'originalElement' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsInSpace.class.st b/src/Bloc/BlElementBoundsInSpace.class.st index 1d4d3a3b8..1ccdb5ade 100644 --- a/src/Bloc/BlElementBoundsInSpace.class.st +++ b/src/Bloc/BlElementBoundsInSpace.class.st @@ -5,7 +5,6 @@ I represent bounds in space Class { #name : 'BlElementBoundsInSpace', #superclass : 'BlElementComputedBounds', - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsUpdater.class.st b/src/Bloc/BlElementBoundsUpdater.class.st index f7c36ef18..910da6356 100644 --- a/src/Bloc/BlElementBoundsUpdater.class.st +++ b/src/Bloc/BlElementBoundsUpdater.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'changes' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementBoundsUpdaterChange.class.st b/src/Bloc/BlElementBoundsUpdaterChange.class.st index a7130f153..25a92696c 100644 --- a/src/Bloc/BlElementBoundsUpdaterChange.class.st +++ b/src/Bloc/BlElementBoundsUpdaterChange.class.st @@ -9,7 +9,6 @@ Class { 'newExtent', 'compositionDepth' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementCachedExplicitTransformation.class.st b/src/Bloc/BlElementCachedExplicitTransformation.class.st index fa0e597a2..1dd7f259c 100644 --- a/src/Bloc/BlElementCachedExplicitTransformation.class.st +++ b/src/Bloc/BlElementCachedExplicitTransformation.class.st @@ -10,7 +10,6 @@ Class { 'elementTransformation', 'boundingRectangle' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementCachedIdentityTransformation.class.st b/src/Bloc/BlElementCachedIdentityTransformation.class.st index d4da845aa..41acb6936 100644 --- a/src/Bloc/BlElementCachedIdentityTransformation.class.st +++ b/src/Bloc/BlElementCachedIdentityTransformation.class.st @@ -10,7 +10,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementCachedTransformation.class.st b/src/Bloc/BlElementCachedTransformation.class.st index a34e97b7b..9141a2dc2 100644 --- a/src/Bloc/BlElementCachedTransformation.class.st +++ b/src/Bloc/BlElementCachedTransformation.class.st @@ -11,7 +11,6 @@ Hence the separation between my subclasses. Class { #name : 'BlElementCachedTransformation', #superclass : 'Object', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementCompositeState.class.st b/src/Bloc/BlElementCompositeState.class.st index c20e6c0de..c2f3a32e1 100644 --- a/src/Bloc/BlElementCompositeState.class.st +++ b/src/Bloc/BlElementCompositeState.class.st @@ -5,7 +5,6 @@ Class { 'left', 'right' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementCompositeTransformation.class.st b/src/Bloc/BlElementCompositeTransformation.class.st index 14032c9be..a023060b3 100644 --- a/src/Bloc/BlElementCompositeTransformation.class.st +++ b/src/Bloc/BlElementCompositeTransformation.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'elementTransformations' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementComputedBounds.class.st b/src/Bloc/BlElementComputedBounds.class.st index faa78c92f..5face161b 100644 --- a/src/Bloc/BlElementComputedBounds.class.st +++ b/src/Bloc/BlElementComputedBounds.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'bounds' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementConjunctionState.class.st b/src/Bloc/BlElementConjunctionState.class.st index 4e20a6041..b5c85b482 100644 --- a/src/Bloc/BlElementConjunctionState.class.st +++ b/src/Bloc/BlElementConjunctionState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementConjunctionState', #superclass : 'BlElementCompositeState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementCurrentProperties.class.st b/src/Bloc/BlElementCurrentProperties.class.st index 1718b1108..296f113fe 100644 --- a/src/Bloc/BlElementCurrentProperties.class.st +++ b/src/Bloc/BlElementCurrentProperties.class.st @@ -9,7 +9,6 @@ Class { 'isDirty', 'resolvedProperties' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementDefaultState.class.st b/src/Bloc/BlElementDefaultState.class.st index b4fa9e4c3..d8ce3396d 100644 --- a/src/Bloc/BlElementDefaultState.class.st +++ b/src/Bloc/BlElementDefaultState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementDefaultState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementDisabledState.class.st b/src/Bloc/BlElementDisabledState.class.st index 1f3e300ad..c6b2d0ef8 100644 --- a/src/Bloc/BlElementDisabledState.class.st +++ b/src/Bloc/BlElementDisabledState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementDisabledState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementDisabledStateEventHandler.class.st b/src/Bloc/BlElementDisabledStateEventHandler.class.st index 273191324..596329e93 100644 --- a/src/Bloc/BlElementDisabledStateEventHandler.class.st +++ b/src/Bloc/BlElementDisabledStateEventHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementDisabledStateEventHandler', #superclass : 'BlElementStateEventHandler', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementDisabledStateWish.class.st b/src/Bloc/BlElementDisabledStateWish.class.st index 76115d789..cf96ba051 100644 --- a/src/Bloc/BlElementDisabledStateWish.class.st +++ b/src/Bloc/BlElementDisabledStateWish.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'enabled' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementDisjunctionState.class.st b/src/Bloc/BlElementDisjunctionState.class.st index eb2dd4162..cf43d94fb 100644 --- a/src/Bloc/BlElementDisjunctionState.class.st +++ b/src/Bloc/BlElementDisjunctionState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementDisjunctionState', #superclass : 'BlElementCompositeState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementDynamicProperty.class.st b/src/Bloc/BlElementDynamicProperty.class.st index bf99b9818..8da5ae8a2 100644 --- a/src/Bloc/BlElementDynamicProperty.class.st +++ b/src/Bloc/BlElementDynamicProperty.class.st @@ -5,7 +5,6 @@ Class { 'applyAction', 'cleanAction' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementDynamicTransformation.class.st b/src/Bloc/BlElementDynamicTransformation.class.st index 2ca562dc4..cb3283ca7 100644 --- a/src/Bloc/BlElementDynamicTransformation.class.st +++ b/src/Bloc/BlElementDynamicTransformation.class.st @@ -8,7 +8,6 @@ This also means that the matrix dimension (2D or 3D) should be determined dynami Class { #name : 'BlElementDynamicTransformation', #superclass : 'BlElementTransformation', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementEffect.class.st b/src/Bloc/BlElementEffect.class.st index 5011fd6db..b4748b38b 100644 --- a/src/Bloc/BlElementEffect.class.st +++ b/src/Bloc/BlElementEffect.class.st @@ -10,7 +10,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlElementEffectProperty.class.st b/src/Bloc/BlElementEffectProperty.class.st index fc17d9fe9..997fcb38e 100644 --- a/src/Bloc/BlElementEffectProperty.class.st +++ b/src/Bloc/BlElementEffectProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'effect' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementEvent.class.st b/src/Bloc/BlElementEvent.class.st index 6401db35e..72a9ef7ef 100644 --- a/src/Bloc/BlElementEvent.class.st +++ b/src/Bloc/BlElementEvent.class.st @@ -7,7 +7,6 @@ See `BlElementEventExamples` for related examples. Class { #name : 'BlElementEvent', #superclass : 'BlEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementEventDispatcher.class.st b/src/Bloc/BlElementEventDispatcher.class.st index f97807bd5..8455bb125 100644 --- a/src/Bloc/BlElementEventDispatcher.class.st +++ b/src/Bloc/BlElementEventDispatcher.class.st @@ -9,7 +9,6 @@ Class { 'activatedElementEvents', 'activatedGeneralEvents' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlElementEventDispatcherActivatedEvents.class.st b/src/Bloc/BlElementEventDispatcherActivatedEvents.class.st index a6e910772..c7426f5b2 100644 --- a/src/Bloc/BlElementEventDispatcherActivatedEvents.class.st +++ b/src/Bloc/BlElementEventDispatcherActivatedEvents.class.st @@ -25,7 +25,6 @@ Class { 'TransformationChanged', 'TransformationInSpaceChanged' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlElementExtentChangedEvent.class.st b/src/Bloc/BlElementExtentChangedEvent.class.st index c3f58fffd..22f3330a7 100644 --- a/src/Bloc/BlElementExtentChangedEvent.class.st +++ b/src/Bloc/BlElementExtentChangedEvent.class.st @@ -5,7 +5,6 @@ Is sent when element's extent in local coordinates changes. Class { #name : 'BlElementExtentChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementFlags.class.st b/src/Bloc/BlElementFlags.class.st index a496d0b28..949530625 100644 --- a/src/Bloc/BlElementFlags.class.st +++ b/src/Bloc/BlElementFlags.class.st @@ -9,7 +9,6 @@ Class { 'ShouldIgnoreLayoutRequests', 'WaitingLayout' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementFocusedState.class.st b/src/Bloc/BlElementFocusedState.class.st index 623130c9f..ea2ff869d 100644 --- a/src/Bloc/BlElementFocusedState.class.st +++ b/src/Bloc/BlElementFocusedState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementFocusedState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementFocusedStateEventHandler.class.st b/src/Bloc/BlElementFocusedStateEventHandler.class.st index dc9a9c303..5000ef871 100644 --- a/src/Bloc/BlElementFocusedStateEventHandler.class.st +++ b/src/Bloc/BlElementFocusedStateEventHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementFocusedStateEventHandler', #superclass : 'BlElementStateEventHandler', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementForegroundProperty.class.st b/src/Bloc/BlElementForegroundProperty.class.st index e05982dc1..b33425e56 100644 --- a/src/Bloc/BlElementForegroundProperty.class.st +++ b/src/Bloc/BlElementForegroundProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'foreground' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementForwardedStyle.class.st b/src/Bloc/BlElementForwardedStyle.class.st index fa2ce9336..a125c1743 100644 --- a/src/Bloc/BlElementForwardedStyle.class.st +++ b/src/Bloc/BlElementForwardedStyle.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'targetObject' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlElementGeometry.class.st b/src/Bloc/BlElementGeometry.class.st index 2fcef00ac..275ac705e 100644 --- a/src/Bloc/BlElementGeometry.class.st +++ b/src/Bloc/BlElementGeometry.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlElementGeometryProperty.class.st b/src/Bloc/BlElementGeometryProperty.class.st index b7bab5f74..cbcf5895e 100644 --- a/src/Bloc/BlElementGeometryProperty.class.st +++ b/src/Bloc/BlElementGeometryProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'geometry' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementHoveredEvent.class.st b/src/Bloc/BlElementHoveredEvent.class.st index a7d24fee3..d9f52d220 100644 --- a/src/Bloc/BlElementHoveredEvent.class.st +++ b/src/Bloc/BlElementHoveredEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementHoveredEvent', #superclass : 'BlElementStateEvent', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementHoveredState.class.st b/src/Bloc/BlElementHoveredState.class.st index 22724a30c..1152f2480 100644 --- a/src/Bloc/BlElementHoveredState.class.st +++ b/src/Bloc/BlElementHoveredState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementHoveredState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementHoveredStateEventHandler.class.st b/src/Bloc/BlElementHoveredStateEventHandler.class.st index 27aae181b..96c1c4039 100644 --- a/src/Bloc/BlElementHoveredStateEventHandler.class.st +++ b/src/Bloc/BlElementHoveredStateEventHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementHoveredStateEventHandler', #superclass : 'BlElementStateEventHandler', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementId.class.st b/src/Bloc/BlElementId.class.st index c4db4a4c2..9f751b07e 100644 --- a/src/Bloc/BlElementId.class.st +++ b/src/Bloc/BlElementId.class.st @@ -7,7 +7,6 @@ Allows to assign id to {{gtClass:BlElement}}. This allows us query a tree of ele Class { #name : 'BlElementId', #superclass : 'Object', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementIdentityTransformation.class.st b/src/Bloc/BlElementIdentityTransformation.class.st index 7c817d18f..ea3387855 100644 --- a/src/Bloc/BlElementIdentityTransformation.class.st +++ b/src/Bloc/BlElementIdentityTransformation.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementIndexedId.class.st b/src/Bloc/BlElementIndexedId.class.st index e7af6b68e..8ce4d2940 100644 --- a/src/Bloc/BlElementIndexedId.class.st +++ b/src/Bloc/BlElementIndexedId.class.st @@ -5,7 +5,6 @@ Class { 'prefixId', 'index' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementIntendedProperties.class.st b/src/Bloc/BlElementIntendedProperties.class.st index d1f3e70f2..6332f79dc 100644 --- a/src/Bloc/BlElementIntendedProperties.class.st +++ b/src/Bloc/BlElementIntendedProperties.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'properties' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementLayoutChangedEvent.class.st b/src/Bloc/BlElementLayoutChangedEvent.class.st index 4b04b0c07..328211852 100644 --- a/src/Bloc/BlElementLayoutChangedEvent.class.st +++ b/src/Bloc/BlElementLayoutChangedEvent.class.st @@ -15,7 +15,6 @@ element layout: BlBasicLayout new Class { #name : 'BlElementLayoutChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementLayoutComputedEvent.class.st b/src/Bloc/BlElementLayoutComputedEvent.class.st index 263e99858..69dbc2ce7 100644 --- a/src/Bloc/BlElementLayoutComputedEvent.class.st +++ b/src/Bloc/BlElementLayoutComputedEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementLayoutComputedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementLayoutHorizontalResizerProperty.class.st b/src/Bloc/BlElementLayoutHorizontalResizerProperty.class.st index 32033fb16..7d688d6a7 100644 --- a/src/Bloc/BlElementLayoutHorizontalResizerProperty.class.st +++ b/src/Bloc/BlElementLayoutHorizontalResizerProperty.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementLayoutHorizontalResizerProperty', #superclass : 'BlElementLayoutResizerProperty', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementLayoutProperty.class.st b/src/Bloc/BlElementLayoutProperty.class.st index c55d7c2da..6d957d7a7 100644 --- a/src/Bloc/BlElementLayoutProperty.class.st +++ b/src/Bloc/BlElementLayoutProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'layout' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementLayoutResizerProperty.class.st b/src/Bloc/BlElementLayoutResizerProperty.class.st index c100d5114..9e3f52a9a 100644 --- a/src/Bloc/BlElementLayoutResizerProperty.class.st +++ b/src/Bloc/BlElementLayoutResizerProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'resizer' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementLayoutVerticalResizerProperty.class.st b/src/Bloc/BlElementLayoutVerticalResizerProperty.class.st index fadb75079..199e8f4b9 100644 --- a/src/Bloc/BlElementLayoutVerticalResizerProperty.class.st +++ b/src/Bloc/BlElementLayoutVerticalResizerProperty.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementLayoutVerticalResizerProperty', #superclass : 'BlElementLayoutResizerProperty', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementLocalBounds.class.st b/src/Bloc/BlElementLocalBounds.class.st index c4a6dad10..4bac05f80 100644 --- a/src/Bloc/BlElementLocalBounds.class.st +++ b/src/Bloc/BlElementLocalBounds.class.st @@ -5,7 +5,6 @@ Class { 'extent', 'position' ], - #category : 'Bloc-Basic-Bounds', #package : 'Bloc', #tag : 'Basic-Bounds' } diff --git a/src/Bloc/BlElementLocalTransformation.class.st b/src/Bloc/BlElementLocalTransformation.class.st index 1807e2d13..6a5ff4060 100644 --- a/src/Bloc/BlElementLocalTransformation.class.st +++ b/src/Bloc/BlElementLocalTransformation.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'affineTransformation' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementMarginProperty.class.st b/src/Bloc/BlElementMarginProperty.class.st index 28fc6c097..4762df57a 100644 --- a/src/Bloc/BlElementMarginProperty.class.st +++ b/src/Bloc/BlElementMarginProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'margin' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementMaybeResolvedProperties.class.st b/src/Bloc/BlElementMaybeResolvedProperties.class.st index 39106cf20..599997779 100644 --- a/src/Bloc/BlElementMaybeResolvedProperties.class.st +++ b/src/Bloc/BlElementMaybeResolvedProperties.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementMaybeResolvedProperties', #superclass : 'BlElementProperties', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementNamedId.class.st b/src/Bloc/BlElementNamedId.class.st index 6bc7a309f..644ce6c86 100644 --- a/src/Bloc/BlElementNamedId.class.st +++ b/src/Bloc/BlElementNamedId.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'identifier' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementNegationState.class.st b/src/Bloc/BlElementNegationState.class.st index dfe458131..97e895c63 100644 --- a/src/Bloc/BlElementNegationState.class.st +++ b/src/Bloc/BlElementNegationState.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'state' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementNoId.class.st b/src/Bloc/BlElementNoId.class.st index b528bc011..e6fb70518 100644 --- a/src/Bloc/BlElementNoId.class.st +++ b/src/Bloc/BlElementNoId.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementPaddingProperty.class.st b/src/Bloc/BlElementPaddingProperty.class.st index 3e4c1858a..feed4acd7 100644 --- a/src/Bloc/BlElementPaddingProperty.class.st +++ b/src/Bloc/BlElementPaddingProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'padding' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementPositionChangedEvent.class.st b/src/Bloc/BlElementPositionChangedEvent.class.st index 821d508f6..63a9af654 100644 --- a/src/Bloc/BlElementPositionChangedEvent.class.st +++ b/src/Bloc/BlElementPositionChangedEvent.class.st @@ -7,7 +7,6 @@ Note: position may change even if an element has no parent Class { #name : 'BlElementPositionChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementPositionInSpaceChangedEvent.class.st b/src/Bloc/BlElementPositionInSpaceChangedEvent.class.st index f0e44edd2..2f95aa1d0 100644 --- a/src/Bloc/BlElementPositionInSpaceChangedEvent.class.st +++ b/src/Bloc/BlElementPositionInSpaceChangedEvent.class.st @@ -7,7 +7,6 @@ Position in space may change even if element's #position is still the same. It c Class { #name : 'BlElementPositionInSpaceChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementPressedState.class.st b/src/Bloc/BlElementPressedState.class.st index 0ec05e271..7ce66d8b3 100644 --- a/src/Bloc/BlElementPressedState.class.st +++ b/src/Bloc/BlElementPressedState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementPressedState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementPressedStateEventHandler.class.st b/src/Bloc/BlElementPressedStateEventHandler.class.st index 4869ba134..ea0b52d60 100644 --- a/src/Bloc/BlElementPressedStateEventHandler.class.st +++ b/src/Bloc/BlElementPressedStateEventHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementPressedStateEventHandler', #superclass : 'BlElementStateEventHandler', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementPropagatableProperties.class.st b/src/Bloc/BlElementPropagatableProperties.class.st index 932460ebf..b7e0dec84 100644 --- a/src/Bloc/BlElementPropagatableProperties.class.st +++ b/src/Bloc/BlElementPropagatableProperties.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementPropagatableProperties', #superclass : 'BlElementResolvedProperties', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementProperties.class.st b/src/Bloc/BlElementProperties.class.st index 77587ecee..841825c3e 100644 --- a/src/Bloc/BlElementProperties.class.st +++ b/src/Bloc/BlElementProperties.class.st @@ -7,7 +7,6 @@ For example font size is by default inherited by the children Class { #name : 'BlElementProperties', #superclass : 'Object', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementProperty.class.st b/src/Bloc/BlElementProperty.class.st index 112024392..40f70939e 100644 --- a/src/Bloc/BlElementProperty.class.st +++ b/src/Bloc/BlElementProperty.class.st @@ -38,7 +38,6 @@ Click on the buttons to the left from the rectangular element to see what happen Class { #name : 'BlElementProperty', #superclass : 'Object', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementPropertyWithStatus.class.st b/src/Bloc/BlElementPropertyWithStatus.class.st index 15ffee433..cff409447 100644 --- a/src/Bloc/BlElementPropertyWithStatus.class.st +++ b/src/Bloc/BlElementPropertyWithStatus.class.st @@ -10,7 +10,6 @@ Class { 'JustAdded', 'ToBeRemoved' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementRemovedFromParentEvent.class.st b/src/Bloc/BlElementRemovedFromParentEvent.class.st index 08569b4c9..d1fefd1aa 100644 --- a/src/Bloc/BlElementRemovedFromParentEvent.class.st +++ b/src/Bloc/BlElementRemovedFromParentEvent.class.st @@ -20,7 +20,6 @@ parent removeChild: child Class { #name : 'BlElementRemovedFromParentEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementRemovedFromSceneGraphEvent.class.st b/src/Bloc/BlElementRemovedFromSceneGraphEvent.class.st index c12a00d19..b867e0940 100644 --- a/src/Bloc/BlElementRemovedFromSceneGraphEvent.class.st +++ b/src/Bloc/BlElementRemovedFromSceneGraphEvent.class.st @@ -5,7 +5,6 @@ I inform that an element was removed from a scene. I can be added to any Bloc e Class { #name : 'BlElementRemovedFromSceneGraphEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementResolvedProperties.class.st b/src/Bloc/BlElementResolvedProperties.class.st index 7589a2cd7..540939972 100644 --- a/src/Bloc/BlElementResolvedProperties.class.st +++ b/src/Bloc/BlElementResolvedProperties.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'properties' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementScrolledEvent.class.st b/src/Bloc/BlElementScrolledEvent.class.st index b57d671fc..1a17c4289 100644 --- a/src/Bloc/BlElementScrolledEvent.class.st +++ b/src/Bloc/BlElementScrolledEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'delta' ], - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementSelectedState.class.st b/src/Bloc/BlElementSelectedState.class.st index eba39d7f3..e58a43b7e 100644 --- a/src/Bloc/BlElementSelectedState.class.st +++ b/src/Bloc/BlElementSelectedState.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementSelectedState', #superclass : 'BlElementUniqueState', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementSelectedStateEventHandler.class.st b/src/Bloc/BlElementSelectedStateEventHandler.class.st index a67f1f25c..f230c8a82 100644 --- a/src/Bloc/BlElementSelectedStateEventHandler.class.st +++ b/src/Bloc/BlElementSelectedStateEventHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementSelectedStateEventHandler', #superclass : 'BlElementStateEventHandler', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementSelectedStateWish.class.st b/src/Bloc/BlElementSelectedStateWish.class.st index 404991206..3e8ebeacd 100644 --- a/src/Bloc/BlElementSelectedStateWish.class.st +++ b/src/Bloc/BlElementSelectedStateWish.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'selected' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementSelectionAcquiredEvent.class.st b/src/Bloc/BlElementSelectionAcquiredEvent.class.st index 7e983ad3a..98b01f7fa 100644 --- a/src/Bloc/BlElementSelectionAcquiredEvent.class.st +++ b/src/Bloc/BlElementSelectionAcquiredEvent.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'bounds' ], - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementSelectionLostEvent.class.st b/src/Bloc/BlElementSelectionLostEvent.class.st index 329557911..33e3fbb79 100644 --- a/src/Bloc/BlElementSelectionLostEvent.class.st +++ b/src/Bloc/BlElementSelectionLostEvent.class.st @@ -5,7 +5,6 @@ Is sent when element is no longer within mouse selection rectangle Class { #name : 'BlElementSelectionLostEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementState.class.st b/src/Bloc/BlElementState.class.st index 9afb0c3b7..01e28c179 100644 --- a/src/Bloc/BlElementState.class.st +++ b/src/Bloc/BlElementState.class.st @@ -4,7 +4,6 @@ Class { #classVars : [ 'UserPriority' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStateEvent.class.st b/src/Bloc/BlElementStateEvent.class.st index 4d85d20da..fc6107c2f 100644 --- a/src/Bloc/BlElementStateEvent.class.st +++ b/src/Bloc/BlElementStateEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'element' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStateEventHandler.class.st b/src/Bloc/BlElementStateEventHandler.class.st index 6dfffdf62..b5b49d225 100644 --- a/src/Bloc/BlElementStateEventHandler.class.st +++ b/src/Bloc/BlElementStateEventHandler.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStateWish.class.st b/src/Bloc/BlElementStateWish.class.st index e1617ca9b..656c04920 100644 --- a/src/Bloc/BlElementStateWish.class.st +++ b/src/Bloc/BlElementStateWish.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementStateWish', #superclass : 'BlEvent', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStates.class.st b/src/Bloc/BlElementStates.class.st index 334f3c4fc..c07121fd9 100644 --- a/src/Bloc/BlElementStates.class.st +++ b/src/Bloc/BlElementStates.class.st @@ -11,7 +11,6 @@ Class { 'localStates', 'inheritedStates' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStatesSet.class.st b/src/Bloc/BlElementStatesSet.class.st index f02367a6c..59e77ad9c 100644 --- a/src/Bloc/BlElementStatesSet.class.st +++ b/src/Bloc/BlElementStatesSet.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementStatesSet', #superclass : 'PluggableSet', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementStyle.class.st b/src/Bloc/BlElementStyle.class.st index 4e514cc94..d2fc1e709 100644 --- a/src/Bloc/BlElementStyle.class.st +++ b/src/Bloc/BlElementStyle.class.st @@ -16,7 +16,6 @@ Class { 'state', 'properties' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlElementStyles.class.st b/src/Bloc/BlElementStyles.class.st index 594565deb..8aa4d7578 100644 --- a/src/Bloc/BlElementStyles.class.st +++ b/src/Bloc/BlElementStyles.class.st @@ -24,7 +24,6 @@ Class { 'isDirty', 'element' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlElementTransformation.class.st b/src/Bloc/BlElementTransformation.class.st index 7e9b1949f..646c952dc 100644 --- a/src/Bloc/BlElementTransformation.class.st +++ b/src/Bloc/BlElementTransformation.class.st @@ -7,7 +7,6 @@ For optimization purposes I use 2D matrix if 3D transformation was not requested Class { #name : 'BlElementTransformation', #superclass : 'Object', - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlElementTransformationChangedEvent.class.st b/src/Bloc/BlElementTransformationChangedEvent.class.st index 7226f6875..01ab5e4b2 100644 --- a/src/Bloc/BlElementTransformationChangedEvent.class.st +++ b/src/Bloc/BlElementTransformationChangedEvent.class.st @@ -7,7 +7,6 @@ Note: transformation may change even if an element has no parent Class { #name : 'BlElementTransformationChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementTransformationInSpaceChangedEvent.class.st b/src/Bloc/BlElementTransformationInSpaceChangedEvent.class.st index 5dd6a78bd..d86e16b75 100644 --- a/src/Bloc/BlElementTransformationInSpaceChangedEvent.class.st +++ b/src/Bloc/BlElementTransformationInSpaceChangedEvent.class.st @@ -7,7 +7,6 @@ Transformation in space may change even if element's transformation is still the Class { #name : 'BlElementTransformationInSpaceChangedEvent', #superclass : 'BlElementEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlElementTransformationScaleProperty.class.st b/src/Bloc/BlElementTransformationScaleProperty.class.st index b1dfffbdb..ab26673d2 100644 --- a/src/Bloc/BlElementTransformationScaleProperty.class.st +++ b/src/Bloc/BlElementTransformationScaleProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'scaleFactor' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementUnhoveredEvent.class.st b/src/Bloc/BlElementUnhoveredEvent.class.st index 7af69eb34..43e08a2d9 100644 --- a/src/Bloc/BlElementUnhoveredEvent.class.st +++ b/src/Bloc/BlElementUnhoveredEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementUnhoveredEvent', #superclass : 'BlElementStateEvent', - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementUniqueId.class.st b/src/Bloc/BlElementUniqueId.class.st index 113081e3c..b5428180c 100644 --- a/src/Bloc/BlElementUniqueId.class.st +++ b/src/Bloc/BlElementUniqueId.class.st @@ -10,7 +10,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlElementUniqueState.class.st b/src/Bloc/BlElementUniqueState.class.st index 72e6b013b..1d8671dc7 100644 --- a/src/Bloc/BlElementUniqueState.class.st +++ b/src/Bloc/BlElementUniqueState.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-State', #package : 'Bloc', #tag : 'Basic-State' } diff --git a/src/Bloc/BlElementUnresolvedProperties.class.st b/src/Bloc/BlElementUnresolvedProperties.class.st index 0c8b02771..38f887ea3 100644 --- a/src/Bloc/BlElementUnresolvedProperties.class.st +++ b/src/Bloc/BlElementUnresolvedProperties.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlElementUnresolvedProperties', #superclass : 'BlElementMaybeResolvedProperties', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementVectorGeometry.class.st b/src/Bloc/BlElementVectorGeometry.class.st index 126a03532..0b5230aa8 100644 --- a/src/Bloc/BlElementVectorGeometry.class.st +++ b/src/Bloc/BlElementVectorGeometry.class.st @@ -8,7 +8,6 @@ Class { 'extent', 'pathCache' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlElementVisibilityProperty.class.st b/src/Bloc/BlElementVisibilityProperty.class.st index 035e09dac..3b6afca41 100644 --- a/src/Bloc/BlElementVisibilityProperty.class.st +++ b/src/Bloc/BlElementVisibilityProperty.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'visibility' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlElementVisuals.class.st b/src/Bloc/BlElementVisuals.class.st index 62e8c8037..9819ed4f4 100644 --- a/src/Bloc/BlElementVisuals.class.st +++ b/src/Bloc/BlElementVisuals.class.st @@ -20,7 +20,6 @@ Class { 'DefaultOutskirts', 'DefaultVisibility' ], - #category : 'Bloc-Basic', #package : 'Bloc', #tag : 'Basic' } diff --git a/src/Bloc/BlElevation.class.st b/src/Bloc/BlElevation.class.st index 186f0e9c9..159153bee 100644 --- a/src/Bloc/BlElevation.class.st +++ b/src/Bloc/BlElevation.class.st @@ -16,7 +16,6 @@ Class { #classInstVars : [ 'zero' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlEllipse.class.st b/src/Bloc/BlEllipse.class.st index f8511061a..da90db028 100644 --- a/src/Bloc/BlEllipse.class.st +++ b/src/Bloc/BlEllipse.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEllipse', #superclass : 'BlEllipseGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlEllipseGeometry.class.st b/src/Bloc/BlEllipseGeometry.class.st index c5f4733c6..ffba1b660 100644 --- a/src/Bloc/BlEllipseGeometry.class.st +++ b/src/Bloc/BlEllipseGeometry.class.st @@ -13,7 +13,6 @@ In order to explicitely create an ellipse use extent: Class { #name : 'BlEllipseGeometry', #superclass : 'BlElementVectorGeometry', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlEmUnit.class.st b/src/Bloc/BlEmUnit.class.st index 66e22a040..16bf0582d 100644 --- a/src/Bloc/BlEmUnit.class.st +++ b/src/Bloc/BlEmUnit.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEmUnit', #superclass : 'BlUnit', - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlEmptyEventRecorder.class.st b/src/Bloc/BlEmptyEventRecorder.class.st index 229cb0c81..eb2d606d6 100644 --- a/src/Bloc/BlEmptyEventRecorder.class.st +++ b/src/Bloc/BlEmptyEventRecorder.class.st @@ -5,7 +5,6 @@ I simply ignore all events (play a role event recorder in a space) Class { #name : 'BlEmptyEventRecorder', #superclass : 'BlSpaceEventRecorder', - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlEmptyGeometry.class.st b/src/Bloc/BlEmptyGeometry.class.st index b0c63b197..43ea7a5bb 100644 --- a/src/Bloc/BlEmptyGeometry.class.st +++ b/src/Bloc/BlEmptyGeometry.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEmptyGeometry', #superclass : 'BlElementGeometry', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlEmptySelection.class.st b/src/Bloc/BlEmptySelection.class.st index 3075172dd..37f26a8d9 100644 --- a/src/Bloc/BlEmptySelection.class.st +++ b/src/Bloc/BlEmptySelection.class.st @@ -5,7 +5,6 @@ I am an empty selection Class { #name : 'BlEmptySelection', #superclass : 'BlSelection', - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlEndAlignment.class.st b/src/Bloc/BlEndAlignment.class.st index 09362ee02..ef9400282 100644 --- a/src/Bloc/BlEndAlignment.class.st +++ b/src/Bloc/BlEndAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEndAlignment', #superclass : 'BlRelativeAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlEqualizer.class.st b/src/Bloc/BlEqualizer.class.st index f1bc59b69..31dd68cb9 100644 --- a/src/Bloc/BlEqualizer.class.st +++ b/src/Bloc/BlEqualizer.class.st @@ -13,7 +13,6 @@ Class { 'sourceElements', 'targetElements' ], - #category : 'Bloc-Utilities - Equalizer', #package : 'Bloc', #tag : 'Utilities - Equalizer' } diff --git a/src/Bloc/BlErrorHandler.class.st b/src/Bloc/BlErrorHandler.class.st index 15c4ad2c8..9fe3b4a4a 100644 --- a/src/Bloc/BlErrorHandler.class.st +++ b/src/Bloc/BlErrorHandler.class.st @@ -8,7 +8,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlEvent.class.st b/src/Bloc/BlEvent.class.st index d1c48b3d6..bb4b89d9d 100644 --- a/src/Bloc/BlEvent.class.st +++ b/src/Bloc/BlEvent.class.st @@ -16,7 +16,6 @@ Class { 'canBePropagated', 'consumed' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEventDelegator.class.st b/src/Bloc/BlEventDelegator.class.st index 3f2ce227b..e93bb85fe 100644 --- a/src/Bloc/BlEventDelegator.class.st +++ b/src/Bloc/BlEventDelegator.class.st @@ -11,7 +11,6 @@ Class { 'eventClass', 'eventTarget' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlEventDispatcher.class.st b/src/Bloc/BlEventDispatcher.class.st index d68b79b0a..5235aa23d 100644 --- a/src/Bloc/BlEventDispatcher.class.st +++ b/src/Bloc/BlEventDispatcher.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlEventDispatcherChain.class.st b/src/Bloc/BlEventDispatcherChain.class.st index d85b4c5b9..cac251983 100644 --- a/src/Bloc/BlEventDispatcherChain.class.st +++ b/src/Bloc/BlEventDispatcherChain.class.st @@ -11,7 +11,6 @@ Class { 'previous', 'dispatcher' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlEventDispatcherEmptyChain.class.st b/src/Bloc/BlEventDispatcherEmptyChain.class.st index e43667d66..b43e6b98d 100644 --- a/src/Bloc/BlEventDispatcherEmptyChain.class.st +++ b/src/Bloc/BlEventDispatcherEmptyChain.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlEventErrorHandler.class.st b/src/Bloc/BlEventErrorHandler.class.st index 86e364465..b1e5d9c8d 100644 --- a/src/Bloc/BlEventErrorHandler.class.st +++ b/src/Bloc/BlEventErrorHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEventErrorHandler', #superclass : 'BlSingleErrorHandler', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlEventFilter.class.st b/src/Bloc/BlEventFilter.class.st index ab95658f0..b694c4c4a 100644 --- a/src/Bloc/BlEventFilter.class.st +++ b/src/Bloc/BlEventFilter.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'eventClass' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlEventForwarder.class.st b/src/Bloc/BlEventForwarder.class.st index ea3acabc8..fc5272072 100644 --- a/src/Bloc/BlEventForwarder.class.st +++ b/src/Bloc/BlEventForwarder.class.st @@ -17,7 +17,6 @@ Class { 'eventTarget', 'eventHandler' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlEventHandler.class.st b/src/Bloc/BlEventHandler.class.st index 482d3eb11..fb5d4d9af 100644 --- a/src/Bloc/BlEventHandler.class.st +++ b/src/Bloc/BlEventHandler.class.st @@ -17,7 +17,6 @@ Class { 'action', 'eventClass' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlEventListener.class.st b/src/Bloc/BlEventListener.class.st index ed1bf7d4a..39c5b74fd 100644 --- a/src/Bloc/BlEventListener.class.st +++ b/src/Bloc/BlEventListener.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlEventListener', #superclass : 'BlBasicEventHandler', - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlEventTraversalBubblingStep.class.st b/src/Bloc/BlEventTraversalBubblingStep.class.st index 8489e8988..f7b064063 100644 --- a/src/Bloc/BlEventTraversalBubblingStep.class.st +++ b/src/Bloc/BlEventTraversalBubblingStep.class.st @@ -7,7 +7,6 @@ This is known as bubbling, and occurs only if BlEvent>>#canBePropagated is true. Class { #name : 'BlEventTraversalBubblingStep', #superclass : 'BlEventTraversalStep', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEventTraversalCapturingStep.class.st b/src/Bloc/BlEventTraversalCapturingStep.class.st index f10ece0ac..fb85a7c00 100644 --- a/src/Bloc/BlEventTraversalCapturingStep.class.st +++ b/src/Bloc/BlEventTraversalCapturingStep.class.st @@ -7,7 +7,6 @@ This process starts with the Space, then Root, then the Element, and so on throu Class { #name : 'BlEventTraversalCapturingStep', #superclass : 'BlEventTraversalStep', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEventTraversalForwardingStep.class.st b/src/Bloc/BlEventTraversalForwardingStep.class.st index d6331eb01..9e9fd2066 100644 --- a/src/Bloc/BlEventTraversalForwardingStep.class.st +++ b/src/Bloc/BlEventTraversalForwardingStep.class.st @@ -5,7 +5,6 @@ The event is being manually forwarded to other dispatchers Class { #name : 'BlEventTraversalForwardingStep', #superclass : 'BlEventTraversalStep', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEventTraversalStep.class.st b/src/Bloc/BlEventTraversalStep.class.st index 5cf5dce7f..d15109ef7 100644 --- a/src/Bloc/BlEventTraversalStep.class.st +++ b/src/Bloc/BlEventTraversalStep.class.st @@ -11,7 +11,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlEventTraversalTargetStep.class.st b/src/Bloc/BlEventTraversalTargetStep.class.st index 4514efd44..85bc05038 100644 --- a/src/Bloc/BlEventTraversalTargetStep.class.st +++ b/src/Bloc/BlEventTraversalTargetStep.class.st @@ -5,7 +5,6 @@ The event has arrived at the event's target. Event listeners registered for this Class { #name : 'BlEventTraversalTargetStep', #superclass : 'BlEventTraversalStep', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlExtentMeasurementSpec.class.st b/src/Bloc/BlExtentMeasurementSpec.class.st index 57199b3ce..f7f6dfc1f 100644 --- a/src/Bloc/BlExtentMeasurementSpec.class.st +++ b/src/Bloc/BlExtentMeasurementSpec.class.st @@ -11,7 +11,6 @@ Class { 'widthSpec', 'heightSpec' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlFastForwardedTime.class.st b/src/Bloc/BlFastForwardedTime.class.st index 9fe5f939b..460f6e55d 100644 --- a/src/Bloc/BlFastForwardedTime.class.st +++ b/src/Bloc/BlFastForwardedTime.class.st @@ -18,7 +18,6 @@ Class { 'previousRealTime', 'previousSpeededUpTime' ], - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlFocusChain.class.st b/src/Bloc/BlFocusChain.class.st index fd886db86..9292e0e5c 100644 --- a/src/Bloc/BlFocusChain.class.st +++ b/src/Bloc/BlFocusChain.class.st @@ -9,7 +9,6 @@ I am used by {{gtClass:BlFocusProcessor}} to properly send events Class { #name : 'BlFocusChain', #superclass : 'DoubleLinkedList', - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlFocusDueToRemovedFromParentReason.class.st b/src/Bloc/BlFocusDueToRemovedFromParentReason.class.st index 05bd13ead..43fe0db9a 100644 --- a/src/Bloc/BlFocusDueToRemovedFromParentReason.class.st +++ b/src/Bloc/BlFocusDueToRemovedFromParentReason.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusDueToRemovedFromParentReason', #superclass : 'BlFocusReason', - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlFocusDueToRemovedFromSpaceReason.class.st b/src/Bloc/BlFocusDueToRemovedFromSpaceReason.class.st index ccee1652f..0a2e48d33 100644 --- a/src/Bloc/BlFocusDueToRemovedFromSpaceReason.class.st +++ b/src/Bloc/BlFocusDueToRemovedFromSpaceReason.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusDueToRemovedFromSpaceReason', #superclass : 'BlFocusReason', - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlFocusEvent.class.st b/src/Bloc/BlFocusEvent.class.st index 24def1e16..c2f4e598e 100644 --- a/src/Bloc/BlFocusEvent.class.st +++ b/src/Bloc/BlFocusEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusEvent', #superclass : 'BlBaseFocusEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlFocusInEvent.class.st b/src/Bloc/BlFocusInEvent.class.st index 032290edb..2103ce43b 100644 --- a/src/Bloc/BlFocusInEvent.class.st +++ b/src/Bloc/BlFocusInEvent.class.st @@ -5,7 +5,6 @@ The `=BlFocusInEvent`= event is sent to an element when it, or any element insid Class { #name : 'BlFocusInEvent', #superclass : 'BlBaseFocusEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlFocusOutEvent.class.st b/src/Bloc/BlFocusOutEvent.class.st index 73aaf9666..4b04ec545 100644 --- a/src/Bloc/BlFocusOutEvent.class.st +++ b/src/Bloc/BlFocusOutEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusOutEvent', #superclass : 'BlBaseFocusEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlFocusProcessor.class.st b/src/Bloc/BlFocusProcessor.class.st index 0cf3d5af1..11f0a786e 100644 --- a/src/Bloc/BlFocusProcessor.class.st +++ b/src/Bloc/BlFocusProcessor.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'focusChain' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlFocusReason.class.st b/src/Bloc/BlFocusReason.class.st index dc5550a02..2259729bf 100644 --- a/src/Bloc/BlFocusReason.class.st +++ b/src/Bloc/BlFocusReason.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlFocusTransferEvent.class.st b/src/Bloc/BlFocusTransferEvent.class.st index f4c0f3dce..f4cffca17 100644 --- a/src/Bloc/BlFocusTransferEvent.class.st +++ b/src/Bloc/BlFocusTransferEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'transfer' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlFocusUnknownReason.class.st b/src/Bloc/BlFocusUnknownReason.class.st index df5873018..1576efa71 100644 --- a/src/Bloc/BlFocusUnknownReason.class.st +++ b/src/Bloc/BlFocusUnknownReason.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusUnknownReason', #superclass : 'BlFocusReason', - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlFocusability.class.st b/src/Bloc/BlFocusability.class.st index 84846a6cb..301bb4b25 100644 --- a/src/Bloc/BlFocusability.class.st +++ b/src/Bloc/BlFocusability.class.st @@ -8,7 +8,6 @@ Class { 'none', 'ignore' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlFocusabilityAfter.class.st b/src/Bloc/BlFocusabilityAfter.class.st index baac44890..474e54306 100644 --- a/src/Bloc/BlFocusabilityAfter.class.st +++ b/src/Bloc/BlFocusabilityAfter.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusabilityAfter', #superclass : 'BlFocusability', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlFocusabilityBefore.class.st b/src/Bloc/BlFocusabilityBefore.class.st index fa6f2c5ef..55495010a 100644 --- a/src/Bloc/BlFocusabilityBefore.class.st +++ b/src/Bloc/BlFocusabilityBefore.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusabilityBefore', #superclass : 'BlFocusability', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlFocusabilityBlock.class.st b/src/Bloc/BlFocusabilityBlock.class.st index e2cff42c3..259b20d13 100644 --- a/src/Bloc/BlFocusabilityBlock.class.st +++ b/src/Bloc/BlFocusabilityBlock.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusabilityBlock', #superclass : 'BlFocusability', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlFocusabilityIgnore.class.st b/src/Bloc/BlFocusabilityIgnore.class.st index 3c3675ff7..9bd00a3da 100644 --- a/src/Bloc/BlFocusabilityIgnore.class.st +++ b/src/Bloc/BlFocusabilityIgnore.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusabilityIgnore', #superclass : 'BlFocusability', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlFocusabilityNone.class.st b/src/Bloc/BlFocusabilityNone.class.st index c30600e3c..e2d178dcb 100644 --- a/src/Bloc/BlFocusabilityNone.class.st +++ b/src/Bloc/BlFocusabilityNone.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlFocusabilityNone', #superclass : 'BlFocusability', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlForwardedElementStyles.class.st b/src/Bloc/BlForwardedElementStyles.class.st index eaea79e95..4dd4478ef 100644 --- a/src/Bloc/BlForwardedElementStyles.class.st +++ b/src/Bloc/BlForwardedElementStyles.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'targetObject' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlForwardedStyles.class.st b/src/Bloc/BlForwardedStyles.class.st index b9a7c549a..81233b6e4 100644 --- a/src/Bloc/BlForwardedStyles.class.st +++ b/src/Bloc/BlForwardedStyles.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'targetObject' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlGaussianShadowEffect.class.st b/src/Bloc/BlGaussianShadowEffect.class.st index 87637097a..2198d6cf8 100644 --- a/src/Bloc/BlGaussianShadowEffect.class.st +++ b/src/Bloc/BlGaussianShadowEffect.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'width' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlGlobalElevation.class.st b/src/Bloc/BlGlobalElevation.class.st index fc49bdd1f..9a8bb6a2f 100644 --- a/src/Bloc/BlGlobalElevation.class.st +++ b/src/Bloc/BlGlobalElevation.class.st @@ -5,7 +5,6 @@ I represent a global element elevation given in Space coordinate system. Class { #name : 'BlGlobalElevation', #superclass : 'BlElevation', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlGrabCursor.class.st b/src/Bloc/BlGrabCursor.class.st index 40a1e4ecf..c9507a7f9 100644 --- a/src/Bloc/BlGrabCursor.class.st +++ b/src/Bloc/BlGrabCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlGrabCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlGrabbingCursor.class.st b/src/Bloc/BlGrabbingCursor.class.st index 1672605fa..9cb9ab05b 100644 --- a/src/Bloc/BlGrabbingCursor.class.st +++ b/src/Bloc/BlGrabbingCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlGrabbingCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlGradientPaint.class.st b/src/Bloc/BlGradientPaint.class.st index 1f035f8bf..2e2218aea 100644 --- a/src/Bloc/BlGradientPaint.class.st +++ b/src/Bloc/BlGradientPaint.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'stops' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlHandCursor.class.st b/src/Bloc/BlHandCursor.class.st index b7fee3259..c55e8cb60 100644 --- a/src/Bloc/BlHandCursor.class.st +++ b/src/Bloc/BlHandCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHandCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlHandledError.class.st b/src/Bloc/BlHandledError.class.st index 0aace24be..b8f4b0622 100644 --- a/src/Bloc/BlHandledError.class.st +++ b/src/Bloc/BlHandledError.class.st @@ -11,7 +11,6 @@ Class { 'framePhase', 'element' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlHandlerAnnouncementSubscription.class.st b/src/Bloc/BlHandlerAnnouncementSubscription.class.st index dff5fa946..0ac35ccb6 100644 --- a/src/Bloc/BlHandlerAnnouncementSubscription.class.st +++ b/src/Bloc/BlHandlerAnnouncementSubscription.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'subscriber' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlHandlerAnnouncerRegistry.class.st b/src/Bloc/BlHandlerAnnouncerRegistry.class.st index 2f0236bac..d59447055 100644 --- a/src/Bloc/BlHandlerAnnouncerRegistry.class.st +++ b/src/Bloc/BlHandlerAnnouncerRegistry.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'announcer' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlHandlerArrayRegistry.class.st b/src/Bloc/BlHandlerArrayRegistry.class.st index 289e1cc94..4be7bc8b4 100644 --- a/src/Bloc/BlHandlerArrayRegistry.class.st +++ b/src/Bloc/BlHandlerArrayRegistry.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'handlers' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlHandlerRegistry.class.st b/src/Bloc/BlHandlerRegistry.class.st index 39fc6b524..222986469 100644 --- a/src/Bloc/BlHandlerRegistry.class.st +++ b/src/Bloc/BlHandlerRegistry.class.st @@ -25,7 +25,6 @@ Class { #classVars : [ 'PreferableHandlerRegistryClass' ], - #category : 'Bloc-Events-Dispatcher', #package : 'Bloc', #tag : 'Events-Dispatcher' } diff --git a/src/Bloc/BlHeadlessBufferSurfaceRenderer.class.st b/src/Bloc/BlHeadlessBufferSurfaceRenderer.class.st index d9fa6ca1d..935a39736 100644 --- a/src/Bloc/BlHeadlessBufferSurfaceRenderer.class.st +++ b/src/Bloc/BlHeadlessBufferSurfaceRenderer.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHeadlessBufferSurfaceRenderer', #superclass : 'BlHostSurfaceRenderer', - #category : 'Bloc-Universe - Host Headless', #package : 'Bloc', #tag : 'Universe - Host Headless' } diff --git a/src/Bloc/BlHeadlessHost.class.st b/src/Bloc/BlHeadlessHost.class.st index 1f19caa4b..12e115b09 100644 --- a/src/Bloc/BlHeadlessHost.class.st +++ b/src/Bloc/BlHeadlessHost.class.st @@ -11,7 +11,6 @@ Class { #classVars : [ 'PulseLoop' ], - #category : 'Bloc-Universe - Host Headless', #package : 'Bloc', #tag : 'Universe - Host Headless' } diff --git a/src/Bloc/BlHeadlessHostSpace.class.st b/src/Bloc/BlHeadlessHostSpace.class.st index bf8c4f3fd..e9693112d 100644 --- a/src/Bloc/BlHeadlessHostSpace.class.st +++ b/src/Bloc/BlHeadlessHostSpace.class.st @@ -12,7 +12,6 @@ Class { 'position', 'title' ], - #category : 'Bloc-Universe - Host Headless', #package : 'Bloc', #tag : 'Universe - Host Headless' } diff --git a/src/Bloc/BlHeightEqualizer.class.st b/src/Bloc/BlHeightEqualizer.class.st index d0b40f0be..5e26a94c1 100644 --- a/src/Bloc/BlHeightEqualizer.class.st +++ b/src/Bloc/BlHeightEqualizer.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'heightBlock' ], - #category : 'Bloc-Utilities - Equalizer', #package : 'Bloc', #tag : 'Utilities - Equalizer' } diff --git a/src/Bloc/BlHelpCursor.class.st b/src/Bloc/BlHelpCursor.class.st index f93dc0cb5..b1ab01688 100644 --- a/src/Bloc/BlHelpCursor.class.st +++ b/src/Bloc/BlHelpCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHelpCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlHistogram.class.st b/src/Bloc/BlHistogram.class.st index 05fb2245d..85e6d57af 100644 --- a/src/Bloc/BlHistogram.class.st +++ b/src/Bloc/BlHistogram.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHistogram', #superclass : 'BlHistogramGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlHistogramGeometry.class.st b/src/Bloc/BlHistogramGeometry.class.st index f5e37178f..71f7b54cd 100644 --- a/src/Bloc/BlHistogramGeometry.class.st +++ b/src/Bloc/BlHistogramGeometry.class.st @@ -20,7 +20,6 @@ Class { 'RightToLeft', 'TopToBottom' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlHorizontalAlignment.class.st b/src/Bloc/BlHorizontalAlignment.class.st index e33802ba1..66bb56b9a 100644 --- a/src/Bloc/BlHorizontalAlignment.class.st +++ b/src/Bloc/BlHorizontalAlignment.class.st @@ -6,7 +6,6 @@ Class { 'left', 'right' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCenterAlignment.class.st b/src/Bloc/BlHorizontalCenterAlignment.class.st index 1fc6bf5eb..35eb25eb0 100644 --- a/src/Bloc/BlHorizontalCenterAlignment.class.st +++ b/src/Bloc/BlHorizontalCenterAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHorizontalCenterAlignment', #superclass : 'BlHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCoordinateAlignment.class.st b/src/Bloc/BlHorizontalCoordinateAlignment.class.st index 3c20b22db..71d2a22e4 100644 --- a/src/Bloc/BlHorizontalCoordinateAlignment.class.st +++ b/src/Bloc/BlHorizontalCoordinateAlignment.class.st @@ -5,7 +5,6 @@ Class { 'coordinate', 'relativeAlignment' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCoordinateEndAlignment.class.st b/src/Bloc/BlHorizontalCoordinateEndAlignment.class.st index 936a14ff5..983c6f0ba 100644 --- a/src/Bloc/BlHorizontalCoordinateEndAlignment.class.st +++ b/src/Bloc/BlHorizontalCoordinateEndAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHorizontalCoordinateEndAlignment', #superclass : 'BlHorizontalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCoordinateLeftAlignment.class.st b/src/Bloc/BlHorizontalCoordinateLeftAlignment.class.st index 57336d3a4..88fd32ce6 100644 --- a/src/Bloc/BlHorizontalCoordinateLeftAlignment.class.st +++ b/src/Bloc/BlHorizontalCoordinateLeftAlignment.class.st @@ -5,7 +5,6 @@ The coordinate is measured from the left side of the outer bounds Class { #name : 'BlHorizontalCoordinateLeftAlignment', #superclass : 'BlHorizontalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCoordinateRightAlignment.class.st b/src/Bloc/BlHorizontalCoordinateRightAlignment.class.st index ce252b77b..8477ec94c 100644 --- a/src/Bloc/BlHorizontalCoordinateRightAlignment.class.st +++ b/src/Bloc/BlHorizontalCoordinateRightAlignment.class.st @@ -5,7 +5,6 @@ The coordinate is measured from the right side of the outer bounds Class { #name : 'BlHorizontalCoordinateRightAlignment', #superclass : 'BlHorizontalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalCoordinateStartAlignment.class.st b/src/Bloc/BlHorizontalCoordinateStartAlignment.class.st index ba0e0cd3b..443a05f73 100644 --- a/src/Bloc/BlHorizontalCoordinateStartAlignment.class.st +++ b/src/Bloc/BlHorizontalCoordinateStartAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHorizontalCoordinateStartAlignment', #superclass : 'BlHorizontalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalEndAlignment.class.st b/src/Bloc/BlHorizontalEndAlignment.class.st index 26a2c3313..762cbdd09 100644 --- a/src/Bloc/BlHorizontalEndAlignment.class.st +++ b/src/Bloc/BlHorizontalEndAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHorizontalEndAlignment', #superclass : 'BlHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHorizontalStartAlignment.class.st b/src/Bloc/BlHorizontalStartAlignment.class.st index 1a6363918..a27082d92 100644 --- a/src/Bloc/BlHorizontalStartAlignment.class.st +++ b/src/Bloc/BlHorizontalStartAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHorizontalStartAlignment', #superclass : 'BlHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlHost.class.st b/src/Bloc/BlHost.class.st index 6a7a36c18..d059de1e0 100644 --- a/src/Bloc/BlHost.class.st +++ b/src/Bloc/BlHost.class.st @@ -12,7 +12,6 @@ Class { #classVars : [ 'PreferableHostClass' ], - #category : 'Bloc-Universe - Host', #package : 'Bloc', #tag : 'Universe - Host' } diff --git a/src/Bloc/BlHostEventFetcher.class.st b/src/Bloc/BlHostEventFetcher.class.st index 831001917..c7d60cbd2 100644 --- a/src/Bloc/BlHostEventFetcher.class.st +++ b/src/Bloc/BlHostEventFetcher.class.st @@ -11,7 +11,6 @@ Class { 'eventQueue', 'hostSpace' ], - #category : 'Bloc-Universe - Host', #package : 'Bloc', #tag : 'Universe - Host' } diff --git a/src/Bloc/BlHostPulseLoop.class.st b/src/Bloc/BlHostPulseLoop.class.st index f48a2b814..3bbbdb0e1 100644 --- a/src/Bloc/BlHostPulseLoop.class.st +++ b/src/Bloc/BlHostPulseLoop.class.st @@ -19,7 +19,6 @@ Class { 'pulseStartMS', 'pulseDurationMS' ], - #category : 'Bloc-Universe - Host', #package : 'Bloc', #tag : 'Universe - Host' } diff --git a/src/Bloc/BlHostRenderer.class.st b/src/Bloc/BlHostRenderer.class.st index 84d8e42d6..c2f814c04 100644 --- a/src/Bloc/BlHostRenderer.class.st +++ b/src/Bloc/BlHostRenderer.class.st @@ -15,7 +15,6 @@ Class { #classInstVars : [ 'preferableClass' ], - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostRendererBufferSurface.class.st b/src/Bloc/BlHostRendererBufferSurface.class.st index fba9a5fc4..a560f0fc6 100644 --- a/src/Bloc/BlHostRendererBufferSurface.class.st +++ b/src/Bloc/BlHostRendererBufferSurface.class.st @@ -12,7 +12,6 @@ Class { 'extent', 'strongReference' ], - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostRendererFormSurface.class.st b/src/Bloc/BlHostRendererFormSurface.class.st index 830bab1a1..e52bc301e 100644 --- a/src/Bloc/BlHostRendererFormSurface.class.st +++ b/src/Bloc/BlHostRendererFormSurface.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'externalForm' ], - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostRendererSurface.class.st b/src/Bloc/BlHostRendererSurface.class.st index e7cdc5dd2..fb2d54cb7 100644 --- a/src/Bloc/BlHostRendererSurface.class.st +++ b/src/Bloc/BlHostRendererSurface.class.st @@ -11,7 +11,6 @@ Class { 'shouldUpdateEveryFrame', 'updateActions' ], - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostSpaceRenderer.class.st b/src/Bloc/BlHostSpaceRenderer.class.st index c85db56cb..91e4643b0 100644 --- a/src/Bloc/BlHostSpaceRenderer.class.st +++ b/src/Bloc/BlHostSpaceRenderer.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHostSpaceRenderer', #superclass : 'Object', - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostSurfaceRenderer.class.st b/src/Bloc/BlHostSurfaceRenderer.class.st index 89090aecb..91d02bf10 100644 --- a/src/Bloc/BlHostSurfaceRenderer.class.st +++ b/src/Bloc/BlHostSurfaceRenderer.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlHostSurfaceRenderer', #superclass : 'Object', - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlHostTextMeasurer.class.st b/src/Bloc/BlHostTextMeasurer.class.st index 074a41658..7cb892284 100644 --- a/src/Bloc/BlHostTextMeasurer.class.st +++ b/src/Bloc/BlHostTextMeasurer.class.st @@ -10,7 +10,6 @@ Used mainly Class { #name : 'BlHostTextMeasurer', #superclass : 'Object', - #category : 'Bloc-Universe - Renderer', #package : 'Bloc', #tag : 'Universe - Renderer' } diff --git a/src/Bloc/BlIdleErrorHandler.class.st b/src/Bloc/BlIdleErrorHandler.class.st index fe359c312..b8bb83c34 100644 --- a/src/Bloc/BlIdleErrorHandler.class.st +++ b/src/Bloc/BlIdleErrorHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlIdleErrorHandler', #superclass : 'BlSingleErrorHandler', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlIgnoredLayout.class.st b/src/Bloc/BlIgnoredLayout.class.st index b30ead65e..bbebf21bd 100644 --- a/src/Bloc/BlIgnoredLayout.class.st +++ b/src/Bloc/BlIgnoredLayout.class.st @@ -5,7 +5,6 @@ Ignore me :) Class { #name : 'BlIgnoredLayout', #superclass : 'BlLayout', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlIgnoredLayoutConstraints.class.st b/src/Bloc/BlIgnoredLayoutConstraints.class.st index 5b5166209..19fae500a 100644 --- a/src/Bloc/BlIgnoredLayoutConstraints.class.st +++ b/src/Bloc/BlIgnoredLayoutConstraints.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlIgnoredLayoutConstraints', #superclass : 'BlLayoutConstraints', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlIgnoredLayoutConstraintsHorizontal.class.st b/src/Bloc/BlIgnoredLayoutConstraintsHorizontal.class.st index 984714fa9..79674026d 100644 --- a/src/Bloc/BlIgnoredLayoutConstraintsHorizontal.class.st +++ b/src/Bloc/BlIgnoredLayoutConstraintsHorizontal.class.st @@ -5,7 +5,6 @@ Class { 'alignment', 'weight' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlIgnoredLayoutConstraintsVertical.class.st b/src/Bloc/BlIgnoredLayoutConstraintsVertical.class.st index 98a8b7d39..a0b7f39bc 100644 --- a/src/Bloc/BlIgnoredLayoutConstraintsVertical.class.st +++ b/src/Bloc/BlIgnoredLayoutConstraintsVertical.class.st @@ -5,7 +5,6 @@ Class { 'alignment', 'weight' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlImageBackground.class.st b/src/Bloc/BlImageBackground.class.st index eb0b41bee..7d13bed20 100644 --- a/src/Bloc/BlImageBackground.class.st +++ b/src/Bloc/BlImageBackground.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'image' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlImageBackgroundBuilder.class.st b/src/Bloc/BlImageBackgroundBuilder.class.st index 089f46590..9adf03e6b 100644 --- a/src/Bloc/BlImageBackgroundBuilder.class.st +++ b/src/Bloc/BlImageBackgroundBuilder.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'form' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlImagePatternPaint.class.st b/src/Bloc/BlImagePatternPaint.class.st index 61b61ff3d..4058b50f8 100644 --- a/src/Bloc/BlImagePatternPaint.class.st +++ b/src/Bloc/BlImagePatternPaint.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'form' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlImmutableObjectChangeError.class.st b/src/Bloc/BlImmutableObjectChangeError.class.st index 687f2a3be..3996344fd 100644 --- a/src/Bloc/BlImmutableObjectChangeError.class.st +++ b/src/Bloc/BlImmutableObjectChangeError.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'object' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlInsets.class.st b/src/Bloc/BlInsets.class.st index 9ba38bebd..0a33cdcab 100644 --- a/src/Bloc/BlInsets.class.st +++ b/src/Bloc/BlInsets.class.st @@ -18,7 +18,6 @@ Class { #classVars : [ 'Empty' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlInterpolator.class.st b/src/Bloc/BlInterpolator.class.st index 3c0c4a041..258ab3355 100644 --- a/src/Bloc/BlInterpolator.class.st +++ b/src/Bloc/BlInterpolator.class.st @@ -18,7 +18,6 @@ Class { #classInstVars : [ 'default' ], - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlKeyCombination.class.st b/src/Bloc/BlKeyCombination.class.st index bd4968eb7..42a030f91 100644 Binary files a/src/Bloc/BlKeyCombination.class.st and b/src/Bloc/BlKeyCombination.class.st differ diff --git a/src/Bloc/BlKeyCombinationBuilder.class.st b/src/Bloc/BlKeyCombinationBuilder.class.st index 4e6b29df3..9ccd2d7e0 100644 --- a/src/Bloc/BlKeyCombinationBuilder.class.st +++ b/src/Bloc/BlKeyCombinationBuilder.class.st @@ -29,7 +29,6 @@ Class { 'combination', 'converter' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlKeyCombinationConverterCNF.class.st b/src/Bloc/BlKeyCombinationConverterCNF.class.st index 34f2fd016..fc17e9476 100644 --- a/src/Bloc/BlKeyCombinationConverterCNF.class.st +++ b/src/Bloc/BlKeyCombinationConverterCNF.class.st @@ -5,7 +5,6 @@ I transform composite key combination formula into a CNF (https://en.wikipedia.o Class { #name : 'BlKeyCombinationConverterCNF', #superclass : 'BlKeyCombinationVisitor', - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlKeyCombinationConverterDNF.class.st b/src/Bloc/BlKeyCombinationConverterDNF.class.st index 09be418cb..f87e61e06 100644 --- a/src/Bloc/BlKeyCombinationConverterDNF.class.st +++ b/src/Bloc/BlKeyCombinationConverterDNF.class.st @@ -5,7 +5,6 @@ I transform composite key combination formula into a DNF (https://en.wikipedia.o Class { #name : 'BlKeyCombinationConverterDNF', #superclass : 'BlKeyCombinationVisitor', - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlKeyCombinationVisitor.class.st b/src/Bloc/BlKeyCombinationVisitor.class.st index eb1c0d7a2..de4c1aa58 100644 --- a/src/Bloc/BlKeyCombinationVisitor.class.st +++ b/src/Bloc/BlKeyCombinationVisitor.class.st @@ -12,7 +12,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlKeyDownEvent.class.st b/src/Bloc/BlKeyDownEvent.class.st index 86cd667e5..1f5fb2e36 100644 --- a/src/Bloc/BlKeyDownEvent.class.st +++ b/src/Bloc/BlKeyDownEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlKeyDownEvent', #superclass : 'BlKeyboardEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlKeyModifiers.class.st b/src/Bloc/BlKeyModifiers.class.st index cc3a9b217..87045bbc4 100644 --- a/src/Bloc/BlKeyModifiers.class.st +++ b/src/Bloc/BlKeyModifiers.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'hashKey' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlKeyUpEvent.class.st b/src/Bloc/BlKeyUpEvent.class.st index 950ed7a4c..e694d812a 100644 --- a/src/Bloc/BlKeyUpEvent.class.st +++ b/src/Bloc/BlKeyUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlKeyUpEvent', #superclass : 'BlKeyboardEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlKeyboardBuffer.class.st b/src/Bloc/BlKeyboardBuffer.class.st index ed8300e82..b3e34343e 100644 --- a/src/Bloc/BlKeyboardBuffer.class.st +++ b/src/Bloc/BlKeyboardBuffer.class.st @@ -12,7 +12,6 @@ Class { #instVars : [ 'events' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlKeyboardEvent.class.st b/src/Bloc/BlKeyboardEvent.class.st index 21e718107..35c6fa10d 100644 --- a/src/Bloc/BlKeyboardEvent.class.st +++ b/src/Bloc/BlKeyboardEvent.class.st @@ -5,7 +5,6 @@ Class { 'scanCode', 'key' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlKeyboardKeyTable.class.st b/src/Bloc/BlKeyboardKeyTable.class.st index 9d26c2393..1b6b63820 100644 --- a/src/Bloc/BlKeyboardKeyTable.class.st +++ b/src/Bloc/BlKeyboardKeyTable.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlKeyboardKeyTable', #superclass : 'Object', - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlKeyboardProcessor.class.st b/src/Bloc/BlKeyboardProcessor.class.st index 9863f2d3c..4bc2853b6 100644 --- a/src/Bloc/BlKeyboardProcessor.class.st +++ b/src/Bloc/BlKeyboardProcessor.class.st @@ -15,7 +15,6 @@ Class { 'previousShortcutTime', 'previousShortcutRepeatTime' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlLayout.class.st b/src/Bloc/BlLayout.class.st index 765f2d153..82c48c9a6 100644 --- a/src/Bloc/BlLayout.class.st +++ b/src/Bloc/BlLayout.class.st @@ -83,7 +83,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlLayoutChildNode.class.st b/src/Bloc/BlLayoutChildNode.class.st index 9da7cb995..bb7698227 100644 --- a/src/Bloc/BlLayoutChildNode.class.st +++ b/src/Bloc/BlLayoutChildNode.class.st @@ -11,7 +11,6 @@ Class { 'userData', 'actions' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutChildNodeWithEdges.class.st b/src/Bloc/BlLayoutChildNodeWithEdges.class.st index f9835be48..d3e75fee8 100644 --- a/src/Bloc/BlLayoutChildNodeWithEdges.class.st +++ b/src/Bloc/BlLayoutChildNodeWithEdges.class.st @@ -7,7 +7,6 @@ Class { 'childNode', 'connectedEdges' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutChildNodeWithElement.class.st b/src/Bloc/BlLayoutChildNodeWithElement.class.st index 060052c42..01e7374b1 100644 --- a/src/Bloc/BlLayoutChildNodeWithElement.class.st +++ b/src/Bloc/BlLayoutChildNodeWithElement.class.st @@ -12,7 +12,6 @@ Class { 'childNode', 'element' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutChildNodeWithTransformation.class.st b/src/Bloc/BlLayoutChildNodeWithTransformation.class.st index a43e337a0..89acf515a 100644 --- a/src/Bloc/BlLayoutChildNodeWithTransformation.class.st +++ b/src/Bloc/BlLayoutChildNodeWithTransformation.class.st @@ -7,7 +7,6 @@ Class { 'childNode', 'transformation' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutCommonConstraints.class.st b/src/Bloc/BlLayoutCommonConstraints.class.st index 9cf331c6d..a08fabe54 100644 --- a/src/Bloc/BlLayoutCommonConstraints.class.st +++ b/src/Bloc/BlLayoutCommonConstraints.class.st @@ -49,7 +49,6 @@ Class { 'previouslyAccessedConstraintsType', 'accountTransformation' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlLayoutCommonConstraintsAxis.class.st b/src/Bloc/BlLayoutCommonConstraintsAxis.class.st index 44420dc3d..186c56258 100644 --- a/src/Bloc/BlLayoutCommonConstraintsAxis.class.st +++ b/src/Bloc/BlLayoutCommonConstraintsAxis.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'resizer' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlLayoutConstraints.class.st b/src/Bloc/BlLayoutConstraints.class.st index 096a32bf1..4f92b8d93 100644 --- a/src/Bloc/BlLayoutConstraints.class.st +++ b/src/Bloc/BlLayoutConstraints.class.st @@ -17,7 +17,6 @@ Class { 'vertical', 'horizontal' ], - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlLayoutConstraintsAxis.class.st b/src/Bloc/BlLayoutConstraintsAxis.class.st index 32ef83570..1e1a03501 100644 --- a/src/Bloc/BlLayoutConstraintsAxis.class.st +++ b/src/Bloc/BlLayoutConstraintsAxis.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlLayoutDirection.class.st b/src/Bloc/BlLayoutDirection.class.st index 776c0edfb..c7c64da5a 100644 --- a/src/Bloc/BlLayoutDirection.class.st +++ b/src/Bloc/BlLayoutDirection.class.st @@ -12,7 +12,6 @@ Class { 'leftToRight', 'rightToLeft' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutEdge.class.st b/src/Bloc/BlLayoutEdge.class.st index 3f492839e..834f25c8f 100644 --- a/src/Bloc/BlLayoutEdge.class.st +++ b/src/Bloc/BlLayoutEdge.class.st @@ -5,7 +5,6 @@ Class { 'fromNode', 'toNode' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutErrorHandler.class.st b/src/Bloc/BlLayoutErrorHandler.class.st index 383029d13..7aa07f100 100644 --- a/src/Bloc/BlLayoutErrorHandler.class.st +++ b/src/Bloc/BlLayoutErrorHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutErrorHandler', #superclass : 'BlSingleErrorHandler', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlLayoutExactResizer.class.st b/src/Bloc/BlLayoutExactResizer.class.st index c49bffd26..0df4e11f6 100644 --- a/src/Bloc/BlLayoutExactResizer.class.st +++ b/src/Bloc/BlLayoutExactResizer.class.st @@ -9,7 +9,6 @@ Class { 'fifty', 'hundred' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutFitContentLimitedOffsetResizer.class.st b/src/Bloc/BlLayoutFitContentLimitedOffsetResizer.class.st index 3297a34e4..8fffaee11 100644 --- a/src/Bloc/BlLayoutFitContentLimitedOffsetResizer.class.st +++ b/src/Bloc/BlLayoutFitContentLimitedOffsetResizer.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'offset' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutFitContentLimitedResizer.class.st b/src/Bloc/BlLayoutFitContentLimitedResizer.class.st index 3aae589f7..f9758683a 100644 --- a/src/Bloc/BlLayoutFitContentLimitedResizer.class.st +++ b/src/Bloc/BlLayoutFitContentLimitedResizer.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutFitContentResizer.class.st b/src/Bloc/BlLayoutFitContentResizer.class.st index 3a6aea631..1d418a497 100644 --- a/src/Bloc/BlLayoutFitContentResizer.class.st +++ b/src/Bloc/BlLayoutFitContentResizer.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutGraphConnectedEdges.class.st b/src/Bloc/BlLayoutGraphConnectedEdges.class.st index e826bea1e..c02c51a18 100644 --- a/src/Bloc/BlLayoutGraphConnectedEdges.class.st +++ b/src/Bloc/BlLayoutGraphConnectedEdges.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutGraphConnectedEdges', #superclass : 'BlLayoutGraphEdgesIterator', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutGraphConnectedNodes.class.st b/src/Bloc/BlLayoutGraphConnectedNodes.class.st index 89fa807a5..003d3dc11 100644 --- a/src/Bloc/BlLayoutGraphConnectedNodes.class.st +++ b/src/Bloc/BlLayoutGraphConnectedNodes.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'edges' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutGraphEdgesIterator.class.st b/src/Bloc/BlLayoutGraphEdgesIterator.class.st index 67f3ce722..c5b510b21 100644 --- a/src/Bloc/BlLayoutGraphEdgesIterator.class.st +++ b/src/Bloc/BlLayoutGraphEdgesIterator.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutGraphEdgesIterator', #superclass : 'BlLayoutGraphIterator', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutGraphIncomingEdges.class.st b/src/Bloc/BlLayoutGraphIncomingEdges.class.st index f7b990634..31b1dcbf5 100644 --- a/src/Bloc/BlLayoutGraphIncomingEdges.class.st +++ b/src/Bloc/BlLayoutGraphIncomingEdges.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutGraphIncomingEdges', #superclass : 'BlLayoutGraphEdgesIterator', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutGraphIterator.class.st b/src/Bloc/BlLayoutGraphIterator.class.st index 5b837e58a..567872fe6 100644 --- a/src/Bloc/BlLayoutGraphIterator.class.st +++ b/src/Bloc/BlLayoutGraphIterator.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'layoutNode' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutGraphOutgoingEdges.class.st b/src/Bloc/BlLayoutGraphOutgoingEdges.class.st index 3388e3449..0113642de 100644 --- a/src/Bloc/BlLayoutGraphOutgoingEdges.class.st +++ b/src/Bloc/BlLayoutGraphOutgoingEdges.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutGraphOutgoingEdges', #superclass : 'BlLayoutGraphEdgesIterator', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutHorizontal.class.st b/src/Bloc/BlLayoutHorizontal.class.st index 4aa3d790c..b784efb9c 100644 --- a/src/Bloc/BlLayoutHorizontal.class.st +++ b/src/Bloc/BlLayoutHorizontal.class.st @@ -5,7 +5,6 @@ I am a concrete horizontal orientation Class { #name : 'BlLayoutHorizontal', #superclass : 'BlLayoutOrientation', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutLeftToRight.class.st b/src/Bloc/BlLayoutLeftToRight.class.st index d103e24f5..5a27ab29e 100644 --- a/src/Bloc/BlLayoutLeftToRight.class.st +++ b/src/Bloc/BlLayoutLeftToRight.class.st @@ -5,7 +5,6 @@ I am a concrete left-to-right direction Class { #name : 'BlLayoutLeftToRight', #superclass : 'BlLayoutDirection', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutMatchParentResizer.class.st b/src/Bloc/BlLayoutMatchParentResizer.class.st index 45a0ada33..35f73b63c 100644 --- a/src/Bloc/BlLayoutMatchParentResizer.class.st +++ b/src/Bloc/BlLayoutMatchParentResizer.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutNode.class.st b/src/Bloc/BlLayoutNode.class.st index 893589d3e..bed453238 100644 --- a/src/Bloc/BlLayoutNode.class.st +++ b/src/Bloc/BlLayoutNode.class.st @@ -6,7 +6,6 @@ Is a node that is laied out by {{gtClass:BlLayout}} Class { #name : 'BlLayoutNode', #superclass : 'Object', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeChildren.class.st b/src/Bloc/BlLayoutNodeChildren.class.st index 0ca3db2c8..a0f0e8da3 100644 --- a/src/Bloc/BlLayoutNodeChildren.class.st +++ b/src/Bloc/BlLayoutNodeChildren.class.st @@ -2,7 +2,6 @@ Class { #name : 'BlLayoutNodeChildren', #superclass : 'Array', #type : 'variable', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeComputedMeasurement.class.st b/src/Bloc/BlLayoutNodeComputedMeasurement.class.st index 753598b9f..30af78961 100644 --- a/src/Bloc/BlLayoutNodeComputedMeasurement.class.st +++ b/src/Bloc/BlLayoutNodeComputedMeasurement.class.st @@ -5,7 +5,6 @@ Class { 'position', 'extent' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeElementAction.class.st b/src/Bloc/BlLayoutNodeElementAction.class.st index 8eedd15fa..42ba83b74 100644 --- a/src/Bloc/BlLayoutNodeElementAction.class.st +++ b/src/Bloc/BlLayoutNodeElementAction.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutNodeElementAction', #superclass : 'Object', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeElementMeasurement.class.st b/src/Bloc/BlLayoutNodeElementMeasurement.class.st index d006ee92a..28333e58d 100644 --- a/src/Bloc/BlLayoutNodeElementMeasurement.class.st +++ b/src/Bloc/BlLayoutNodeElementMeasurement.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'element' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeMeasurement.class.st b/src/Bloc/BlLayoutNodeMeasurement.class.st index c5c911e27..7aa25506f 100644 --- a/src/Bloc/BlLayoutNodeMeasurement.class.st +++ b/src/Bloc/BlLayoutNodeMeasurement.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutNodeMeasurement', #superclass : 'Object', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeNullMeasurement.class.st b/src/Bloc/BlLayoutNodeNullMeasurement.class.st index 5cb530284..a38403eab 100644 --- a/src/Bloc/BlLayoutNodeNullMeasurement.class.st +++ b/src/Bloc/BlLayoutNodeNullMeasurement.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutNodeNullMeasurement', #superclass : 'BlLayoutNodeMeasurement', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutNodeResizerMeasurement.class.st b/src/Bloc/BlLayoutNodeResizerMeasurement.class.st index 4c1fe9a30..d190043c6 100644 --- a/src/Bloc/BlLayoutNodeResizerMeasurement.class.st +++ b/src/Bloc/BlLayoutNodeResizerMeasurement.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlLayoutNodeResizerMeasurement', #superclass : 'BlLayoutNodeMeasurement', - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutOrientation.class.st b/src/Bloc/BlLayoutOrientation.class.st index b43c13922..0b04a2ab5 100644 --- a/src/Bloc/BlLayoutOrientation.class.st +++ b/src/Bloc/BlLayoutOrientation.class.st @@ -12,7 +12,6 @@ Class { 'horizontal', 'vertical' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutParentNode.class.st b/src/Bloc/BlLayoutParentNode.class.st index 2a6128cb6..a22c93fe7 100644 --- a/src/Bloc/BlLayoutParentNode.class.st +++ b/src/Bloc/BlLayoutParentNode.class.st @@ -10,7 +10,6 @@ Class { 'extent', 'position' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutParentNodeWithEdges.class.st b/src/Bloc/BlLayoutParentNodeWithEdges.class.st index c644b21c9..1fcca5afe 100644 --- a/src/Bloc/BlLayoutParentNodeWithEdges.class.st +++ b/src/Bloc/BlLayoutParentNodeWithEdges.class.st @@ -7,7 +7,6 @@ Class { 'parentNode', 'children' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutParentNodeWithFilter.class.st b/src/Bloc/BlLayoutParentNodeWithFilter.class.st index a97672fd4..9f125bfea 100644 --- a/src/Bloc/BlLayoutParentNodeWithFilter.class.st +++ b/src/Bloc/BlLayoutParentNodeWithFilter.class.st @@ -8,7 +8,6 @@ Class { 'filter', 'children' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutParentNodeWithTransformation.class.st b/src/Bloc/BlLayoutParentNodeWithTransformation.class.st index f22248ac4..993755478 100644 --- a/src/Bloc/BlLayoutParentNodeWithTransformation.class.st +++ b/src/Bloc/BlLayoutParentNodeWithTransformation.class.st @@ -7,7 +7,6 @@ Class { 'parentNode', 'transformation' ], - #category : 'Bloc-Layouts-Model', #package : 'Bloc', #tag : 'Layouts-Model' } diff --git a/src/Bloc/BlLayoutResizer.class.st b/src/Bloc/BlLayoutResizer.class.st index bd8fce0a5..987bd6e0b 100644 --- a/src/Bloc/BlLayoutResizer.class.st +++ b/src/Bloc/BlLayoutResizer.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutRightToLeft.class.st b/src/Bloc/BlLayoutRightToLeft.class.st index bbdddf0d1..628e36abd 100644 --- a/src/Bloc/BlLayoutRightToLeft.class.st +++ b/src/Bloc/BlLayoutRightToLeft.class.st @@ -5,7 +5,6 @@ I am a concrete right-to-left direction Class { #name : 'BlLayoutRightToLeft', #superclass : 'BlLayoutDirection', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLayoutVertical.class.st b/src/Bloc/BlLayoutVertical.class.st index c29e4e26f..e14a8d27d 100644 --- a/src/Bloc/BlLayoutVertical.class.st +++ b/src/Bloc/BlLayoutVertical.class.st @@ -5,7 +5,6 @@ I am a concrete vertical orientation Class { #name : 'BlLayoutVertical', #superclass : 'BlLayoutOrientation', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlLeftAlignment.class.st b/src/Bloc/BlLeftAlignment.class.st index bbdc2d81d..d3f1329ad 100644 --- a/src/Bloc/BlLeftAlignment.class.st +++ b/src/Bloc/BlLeftAlignment.class.st @@ -6,7 +6,6 @@ See BlLayoutAlignment for more info. Class { #name : 'BlLeftAlignment', #superclass : 'BlHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlLine.class.st b/src/Bloc/BlLine.class.st index a2a8e4050..c7530b2cd 100644 --- a/src/Bloc/BlLine.class.st +++ b/src/Bloc/BlLine.class.st @@ -5,7 +5,6 @@ I define a geometry of a straight line Class { #name : 'BlLine', #superclass : 'BlLineGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlLineGeometry.class.st b/src/Bloc/BlLineGeometry.class.st index 39464aca4..8676e3047 100644 --- a/src/Bloc/BlLineGeometry.class.st +++ b/src/Bloc/BlLineGeometry.class.st @@ -8,7 +8,6 @@ Class { 'from', 'to' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlLinearGradientPaint.class.st b/src/Bloc/BlLinearGradientPaint.class.st index 9c9158f8b..8ee5a010a 100644 --- a/src/Bloc/BlLinearGradientPaint.class.st +++ b/src/Bloc/BlLinearGradientPaint.class.st @@ -5,7 +5,6 @@ Class { 'start', 'end' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlLinearInterpolator.class.st b/src/Bloc/BlLinearInterpolator.class.st index 6864c0298..4cd760ed1 100644 --- a/src/Bloc/BlLinearInterpolator.class.st +++ b/src/Bloc/BlLinearInterpolator.class.st @@ -5,7 +5,6 @@ I am an interpolator where the rate of change is constant Class { #name : 'BlLinearInterpolator', #superclass : 'BlInterpolator', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlMatrix.class.st b/src/Bloc/BlMatrix.class.st index 38969749c..87515c96c 100644 --- a/src/Bloc/BlMatrix.class.st +++ b/src/Bloc/BlMatrix.class.st @@ -7,7 +7,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrix2D.class.st b/src/Bloc/BlMatrix2D.class.st index 2338eb96f..5c219b185 100644 --- a/src/Bloc/BlMatrix2D.class.st +++ b/src/Bloc/BlMatrix2D.class.st @@ -20,7 +20,6 @@ Class { 'sx', 'sy' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrix3D.class.st b/src/Bloc/BlMatrix3D.class.st index fe5c9150d..b8e753614 100644 --- a/src/Bloc/BlMatrix3D.class.st +++ b/src/Bloc/BlMatrix3D.class.st @@ -31,7 +31,6 @@ Class { 'z', 'w' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrixDecomposition.class.st b/src/Bloc/BlMatrixDecomposition.class.st index 26e2320ac..9858fc1e9 100644 --- a/src/Bloc/BlMatrixDecomposition.class.st +++ b/src/Bloc/BlMatrixDecomposition.class.st @@ -18,7 +18,6 @@ For example in case of 2D matrix they are: Class { #name : 'BlMatrixDecomposition', #superclass : 'Object', - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrixDecomposition2D.class.st b/src/Bloc/BlMatrixDecomposition2D.class.st index c55f447d8..57bfda56b 100644 --- a/src/Bloc/BlMatrixDecomposition2D.class.st +++ b/src/Bloc/BlMatrixDecomposition2D.class.st @@ -13,7 +13,6 @@ Class { 'angle', 'matrix' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrixDecomposition3D.class.st b/src/Bloc/BlMatrixDecomposition3D.class.st index aa147d4c9..e2c1d22ec 100644 --- a/src/Bloc/BlMatrixDecomposition3D.class.st +++ b/src/Bloc/BlMatrixDecomposition3D.class.st @@ -5,7 +5,6 @@ I am a decomposition of 3D matrix Class { #name : 'BlMatrixDecomposition3D', #superclass : 'BlMatrixDecomposition', - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlMatrixTransformation.class.st b/src/Bloc/BlMatrixTransformation.class.st index b1da0b968..00d287098 100644 --- a/src/Bloc/BlMatrixTransformation.class.st +++ b/src/Bloc/BlMatrixTransformation.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'matrix' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlMeasurementAtMostMode.class.st b/src/Bloc/BlMeasurementAtMostMode.class.st index adce03aa4..4da773b5f 100644 --- a/src/Bloc/BlMeasurementAtMostMode.class.st +++ b/src/Bloc/BlMeasurementAtMostMode.class.st @@ -6,7 +6,6 @@ For more information see class comment of BlMeasurementMode Class { #name : 'BlMeasurementAtMostMode', #superclass : 'BlMeasurementMode', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlMeasurementExactMode.class.st b/src/Bloc/BlMeasurementExactMode.class.st index 525d0d247..cc69fc2ea 100644 --- a/src/Bloc/BlMeasurementExactMode.class.st +++ b/src/Bloc/BlMeasurementExactMode.class.st @@ -6,7 +6,6 @@ For more information see class comment of BlMeasurementMode Class { #name : 'BlMeasurementExactMode', #superclass : 'BlMeasurementMode', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlMeasurementMode.class.st b/src/Bloc/BlMeasurementMode.class.st index a9ba7387e..f772e5ab7 100644 --- a/src/Bloc/BlMeasurementMode.class.st +++ b/src/Bloc/BlMeasurementMode.class.st @@ -19,7 +19,6 @@ Class { 'exact', 'unspecified' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlMeasurementSpec.class.st b/src/Bloc/BlMeasurementSpec.class.st index 4f3429bb5..3a645eba9 100644 --- a/src/Bloc/BlMeasurementSpec.class.st +++ b/src/Bloc/BlMeasurementSpec.class.st @@ -5,7 +5,6 @@ Class { 'size', 'mode' ], - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlMeasurementUnspecifiedMode.class.st b/src/Bloc/BlMeasurementUnspecifiedMode.class.st index a770f960c..e576c2760 100644 --- a/src/Bloc/BlMeasurementUnspecifiedMode.class.st +++ b/src/Bloc/BlMeasurementUnspecifiedMode.class.st @@ -6,7 +6,6 @@ For more information see class comment of BlMeasurementMode Class { #name : 'BlMeasurementUnspecifiedMode', #superclass : 'BlMeasurementMode', - #category : 'Bloc-Layouts-Support', #package : 'Bloc', #tag : 'Layouts-Support' } diff --git a/src/Bloc/BlMemoryEventRecorder.class.st b/src/Bloc/BlMemoryEventRecorder.class.st index d098f0eea..58d8ca2f5 100644 --- a/src/Bloc/BlMemoryEventRecorder.class.st +++ b/src/Bloc/BlMemoryEventRecorder.class.st @@ -10,7 +10,6 @@ Class { 'time', 'pulseTimestamp' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlMemoryTelemetry.class.st b/src/Bloc/BlMemoryTelemetry.class.st index a9bd6bc71..a88ade4ea 100644 --- a/src/Bloc/BlMemoryTelemetry.class.st +++ b/src/Bloc/BlMemoryTelemetry.class.st @@ -5,7 +5,6 @@ Class { 'tasks', 'tasksStack' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlMiddleAlignment.class.st b/src/Bloc/BlMiddleAlignment.class.st index 9de111089..4f12fafe6 100644 --- a/src/Bloc/BlMiddleAlignment.class.st +++ b/src/Bloc/BlMiddleAlignment.class.st @@ -6,7 +6,6 @@ See BlLayoutAlignment for more info. Class { #name : 'BlMiddleAlignment', #superclass : 'BlRelativeAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlMiddleClickEvent.class.st b/src/Bloc/BlMiddleClickEvent.class.st index bed034687..ead6511fb 100644 --- a/src/Bloc/BlMiddleClickEvent.class.st +++ b/src/Bloc/BlMiddleClickEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMiddleClickEvent', #superclass : 'BlClickEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMiddleMouseDownEvent.class.st b/src/Bloc/BlMiddleMouseDownEvent.class.st index c49b501b9..5a9dedea7 100644 --- a/src/Bloc/BlMiddleMouseDownEvent.class.st +++ b/src/Bloc/BlMiddleMouseDownEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMiddleMouseDownEvent', #superclass : 'BlMouseDownEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMiddleMouseUpEvent.class.st b/src/Bloc/BlMiddleMouseUpEvent.class.st index a14700f87..69f9b4f26 100644 --- a/src/Bloc/BlMiddleMouseUpEvent.class.st +++ b/src/Bloc/BlMiddleMouseUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMiddleMouseUpEvent', #superclass : 'BlMouseUpEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMonotoneSelection.class.st b/src/Bloc/BlMonotoneSelection.class.st index 5c9446bbc..6d91c9a71 100644 --- a/src/Bloc/BlMonotoneSelection.class.st +++ b/src/Bloc/BlMonotoneSelection.class.st @@ -11,7 +11,6 @@ Class { 'from', 'to' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlMouseButton.class.st b/src/Bloc/BlMouseButton.class.st index e5fb26dd3..f2450f10b 100644 --- a/src/Bloc/BlMouseButton.class.st +++ b/src/Bloc/BlMouseButton.class.st @@ -9,7 +9,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseDownEvent.class.st b/src/Bloc/BlMouseDownEvent.class.st index 501e66537..9871fe7e0 100644 --- a/src/Bloc/BlMouseDownEvent.class.st +++ b/src/Bloc/BlMouseDownEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMouseDownEvent', #superclass : 'BlMousePickEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseDownOutsideEvent.class.st b/src/Bloc/BlMouseDownOutsideEvent.class.st index 82a6b05c3..e86ec15e3 100644 --- a/src/Bloc/BlMouseDownOutsideEvent.class.st +++ b/src/Bloc/BlMouseDownOutsideEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMouseDownOutsideEvent', #superclass : 'BlMousePickOutsideEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlMouseDragState.class.st b/src/Bloc/BlMouseDragState.class.st index 1e504490b..97e669d9e 100644 --- a/src/Bloc/BlMouseDragState.class.st +++ b/src/Bloc/BlMouseDragState.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'button' ], - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlMouseEnterEvent.class.st b/src/Bloc/BlMouseEnterEvent.class.st index 464342b17..5e9e6225d 100644 --- a/src/Bloc/BlMouseEnterEvent.class.st +++ b/src/Bloc/BlMouseEnterEvent.class.st @@ -13,7 +13,6 @@ https://developer.mozilla.org/en-US/docs/Web/Events/mouseenter Class { #name : 'BlMouseEnterEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseEvent.class.st b/src/Bloc/BlMouseEvent.class.st index 5eb1c548d..8cf921a6a 100644 --- a/src/Bloc/BlMouseEvent.class.st +++ b/src/Bloc/BlMouseEvent.class.st @@ -7,7 +7,6 @@ Class { 'button', 'delta' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseLeaveEvent.class.st b/src/Bloc/BlMouseLeaveEvent.class.st index 0cc2ec840..635e6b249 100644 --- a/src/Bloc/BlMouseLeaveEvent.class.st +++ b/src/Bloc/BlMouseLeaveEvent.class.st @@ -12,7 +12,6 @@ https://developer.mozilla.org/en-US/docs/Web/Events/mouseleave Class { #name : 'BlMouseLeaveEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseMiddleButton.class.st b/src/Bloc/BlMouseMiddleButton.class.st index cea0ef77f..5213ad4cc 100644 --- a/src/Bloc/BlMouseMiddleButton.class.st +++ b/src/Bloc/BlMouseMiddleButton.class.st @@ -5,7 +5,6 @@ I am a middle mouse button. Often can be triggered by mouse wheel click Class { #name : 'BlMouseMiddleButton', #superclass : 'BlMouseNamedButton', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseMoveEvent.class.st b/src/Bloc/BlMouseMoveEvent.class.st index 2a15c7878..4b1e8222c 100644 --- a/src/Bloc/BlMouseMoveEvent.class.st +++ b/src/Bloc/BlMouseMoveEvent.class.st @@ -7,7 +7,6 @@ https://developer.mozilla.org/en-US/docs/Web/Events/mousemove Class { #name : 'BlMouseMoveEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseNamedButton.class.st b/src/Bloc/BlMouseNamedButton.class.st index 50df3bae4..86c1a3ce7 100644 --- a/src/Bloc/BlMouseNamedButton.class.st +++ b/src/Bloc/BlMouseNamedButton.class.st @@ -8,7 +8,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseOtherButton.class.st b/src/Bloc/BlMouseOtherButton.class.st index 670755d79..9b29df11c 100644 --- a/src/Bloc/BlMouseOtherButton.class.st +++ b/src/Bloc/BlMouseOtherButton.class.st @@ -9,7 +9,6 @@ Class { #instVars : [ 'code' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseOutEvent.class.st b/src/Bloc/BlMouseOutEvent.class.st index 69b22cb2d..af8981dbc 100644 --- a/src/Bloc/BlMouseOutEvent.class.st +++ b/src/Bloc/BlMouseOutEvent.class.st @@ -9,7 +9,6 @@ https://developer.mozilla.org/en-US/docs/Web/Events/mouseout Class { #name : 'BlMouseOutEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseOverEvent.class.st b/src/Bloc/BlMouseOverEvent.class.st index 027c043e2..e652470a7 100644 --- a/src/Bloc/BlMouseOverEvent.class.st +++ b/src/Bloc/BlMouseOverEvent.class.st @@ -11,7 +11,6 @@ https://developer.mozilla.org/en-US/docs/Web/Events/mouseover Class { #name : 'BlMouseOverEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMousePickEvent.class.st b/src/Bloc/BlMousePickEvent.class.st index ae1807e52..09b2cc291 100644 --- a/src/Bloc/BlMousePickEvent.class.st +++ b/src/Bloc/BlMousePickEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMousePickEvent', #superclass : 'BlMouseEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMousePickOutsideEvent.class.st b/src/Bloc/BlMousePickOutsideEvent.class.st index aa9041633..a5b818eb2 100644 --- a/src/Bloc/BlMousePickOutsideEvent.class.st +++ b/src/Bloc/BlMousePickOutsideEvent.class.st @@ -5,7 +5,6 @@ Class { 'originalEvent', 'lastMouseDownEvent' ], - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlMousePrimaryButton.class.st b/src/Bloc/BlMousePrimaryButton.class.st index f8324b1a4..32945bf37 100644 --- a/src/Bloc/BlMousePrimaryButton.class.st +++ b/src/Bloc/BlMousePrimaryButton.class.st @@ -5,7 +5,6 @@ I am a primary mouse button. In most cases is bound to the left button. Class { #name : 'BlMousePrimaryButton', #superclass : 'BlMouseNamedButton', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseProcessor.class.st b/src/Bloc/BlMouseProcessor.class.st index 54293133e..a5265e901 100644 --- a/src/Bloc/BlMouseProcessor.class.st +++ b/src/Bloc/BlMouseProcessor.class.st @@ -14,7 +14,6 @@ Class { 'lastMouseMoveEvent', 'lastMouseDownEvent' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlMouseSecondaryButton.class.st b/src/Bloc/BlMouseSecondaryButton.class.st index 3ea5d22fd..e11a341ce 100644 --- a/src/Bloc/BlMouseSecondaryButton.class.st +++ b/src/Bloc/BlMouseSecondaryButton.class.st @@ -5,7 +5,6 @@ I am a secondary mouse button. In most cases is bound to the right button and us Class { #name : 'BlMouseSecondaryButton', #superclass : 'BlMouseNamedButton', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseUpEvent.class.st b/src/Bloc/BlMouseUpEvent.class.st index 68e6b8b72..ea5502b22 100644 --- a/src/Bloc/BlMouseUpEvent.class.st +++ b/src/Bloc/BlMouseUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMouseUpEvent', #superclass : 'BlMousePickEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMouseUpOutsideEvent.class.st b/src/Bloc/BlMouseUpOutsideEvent.class.st index f097b4a2a..229922900 100644 --- a/src/Bloc/BlMouseUpOutsideEvent.class.st +++ b/src/Bloc/BlMouseUpOutsideEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMouseUpOutsideEvent', #superclass : 'BlMousePickOutsideEvent', - #category : 'Bloc-Events-Type-Element', #package : 'Bloc', #tag : 'Events-Type-Element' } diff --git a/src/Bloc/BlMouseWheelEvent.class.st b/src/Bloc/BlMouseWheelEvent.class.st index 0dd0a3219..163fadf90 100644 --- a/src/Bloc/BlMouseWheelEvent.class.st +++ b/src/Bloc/BlMouseWheelEvent.class.st @@ -17,7 +17,6 @@ Class { 'vector', 'isTouch' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlMoveCursor.class.st b/src/Bloc/BlMoveCursor.class.st index 5e705b925..cd4588fd6 100644 --- a/src/Bloc/BlMoveCursor.class.st +++ b/src/Bloc/BlMoveCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMoveCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlMultiPolygon.class.st b/src/Bloc/BlMultiPolygon.class.st index 0a173b33c..6c667a233 100644 --- a/src/Bloc/BlMultiPolygon.class.st +++ b/src/Bloc/BlMultiPolygon.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMultiPolygon', #superclass : 'BlMultiPolygonGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlMultiPolygonGeometry.class.st b/src/Bloc/BlMultiPolygonGeometry.class.st index 9838b646a..91fb0ac9f 100644 --- a/src/Bloc/BlMultiPolygonGeometry.class.st +++ b/src/Bloc/BlMultiPolygonGeometry.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'polygons' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlMultiPolyline.class.st b/src/Bloc/BlMultiPolyline.class.st index a423cf99e..4481e35fe 100644 --- a/src/Bloc/BlMultiPolyline.class.st +++ b/src/Bloc/BlMultiPolyline.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlMultiPolyline', #superclass : 'BlMultiPolylineGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlMultiPolylineGeometry.class.st b/src/Bloc/BlMultiPolylineGeometry.class.st index 750a63fd2..3cca10311 100644 --- a/src/Bloc/BlMultiPolylineGeometry.class.st +++ b/src/Bloc/BlMultiPolylineGeometry.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'polylines' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlMultipleSelection.class.st b/src/Bloc/BlMultipleSelection.class.st index 400d26194..aa2164eed 100644 --- a/src/Bloc/BlMultipleSelection.class.st +++ b/src/Bloc/BlMultipleSelection.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'selections' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlNamedCursor.class.st b/src/Bloc/BlNamedCursor.class.st index c320815d3..29d281786 100644 --- a/src/Bloc/BlNamedCursor.class.st +++ b/src/Bloc/BlNamedCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNamedCursor', #superclass : 'BlCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlNoDropCursor.class.st b/src/Bloc/BlNoDropCursor.class.st index abf97d387..040110ed6 100644 --- a/src/Bloc/BlNoDropCursor.class.st +++ b/src/Bloc/BlNoDropCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNoDropCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlNodeBasedLayout.class.st b/src/Bloc/BlNodeBasedLayout.class.st index 99940f352..621f5a13d 100644 --- a/src/Bloc/BlNodeBasedLayout.class.st +++ b/src/Bloc/BlNodeBasedLayout.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNodeBasedLayout', #superclass : 'BlLayout', - #category : 'Bloc-Layouts-Basic', #package : 'Bloc', #tag : 'Layouts-Basic' } diff --git a/src/Bloc/BlNormalizedPolygon.class.st b/src/Bloc/BlNormalizedPolygon.class.st index 596fc6ca0..0d4c9c827 100644 --- a/src/Bloc/BlNormalizedPolygon.class.st +++ b/src/Bloc/BlNormalizedPolygon.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNormalizedPolygon', #superclass : 'BlNormalizedPolygonGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlNormalizedPolygonGeometry.class.st b/src/Bloc/BlNormalizedPolygonGeometry.class.st index ca945d944..96641786e 100644 --- a/src/Bloc/BlNormalizedPolygonGeometry.class.st +++ b/src/Bloc/BlNormalizedPolygonGeometry.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'vertices' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlNormalizedPolyline.class.st b/src/Bloc/BlNormalizedPolyline.class.st index 2f124befd..883d60b6f 100644 --- a/src/Bloc/BlNormalizedPolyline.class.st +++ b/src/Bloc/BlNormalizedPolyline.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNormalizedPolyline', #superclass : 'BlNormalizedPolylineGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlNormalizedPolylineGeometry.class.st b/src/Bloc/BlNormalizedPolylineGeometry.class.st index e5fe70b93..f729e8adf 100644 --- a/src/Bloc/BlNormalizedPolylineGeometry.class.st +++ b/src/Bloc/BlNormalizedPolylineGeometry.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'vertices' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlNotAllowedCursor.class.st b/src/Bloc/BlNotAllowedCursor.class.st index bac7823ac..5480e8c24 100644 --- a/src/Bloc/BlNotAllowedCursor.class.st +++ b/src/Bloc/BlNotAllowedCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNotAllowedCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlNullAlignment.class.st b/src/Bloc/BlNullAlignment.class.st index 7b305c62b..4a1a44791 100644 --- a/src/Bloc/BlNullAlignment.class.st +++ b/src/Bloc/BlNullAlignment.class.st @@ -6,7 +6,6 @@ See BlLayoutAlignment for more info. Class { #name : 'BlNullAlignment', #superclass : 'BlElementAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlNullEffect.class.st b/src/Bloc/BlNullEffect.class.st index be8bbd9cf..bba417b34 100644 --- a/src/Bloc/BlNullEffect.class.st +++ b/src/Bloc/BlNullEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNullEffect', #superclass : 'BlElementEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlNullHorizontalAlignment.class.st b/src/Bloc/BlNullHorizontalAlignment.class.st index bc392c196..59e86e775 100644 --- a/src/Bloc/BlNullHorizontalAlignment.class.st +++ b/src/Bloc/BlNullHorizontalAlignment.class.st @@ -5,7 +5,6 @@ Class { 'rightToLeft', 'leftToRight' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlNullLeftAlignment.class.st b/src/Bloc/BlNullLeftAlignment.class.st index d3606678d..84580d236 100644 --- a/src/Bloc/BlNullLeftAlignment.class.st +++ b/src/Bloc/BlNullLeftAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNullLeftAlignment', #superclass : 'BlNullHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlNullRightAlignment.class.st b/src/Bloc/BlNullRightAlignment.class.st index f372d9898..a78e4717b 100644 --- a/src/Bloc/BlNullRightAlignment.class.st +++ b/src/Bloc/BlNullRightAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNullRightAlignment', #superclass : 'BlNullHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlNullSpaceReference.class.st b/src/Bloc/BlNullSpaceReference.class.st index 5ce0d385a..43053c11a 100644 --- a/src/Bloc/BlNullSpaceReference.class.st +++ b/src/Bloc/BlNullSpaceReference.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlNullTelemetry.class.st b/src/Bloc/BlNullTelemetry.class.st index 1488e7c42..b33e96adf 100644 --- a/src/Bloc/BlNullTelemetry.class.st +++ b/src/Bloc/BlNullTelemetry.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlNullVerticalAlignment.class.st b/src/Bloc/BlNullVerticalAlignment.class.st index 09e28c1e4..a24c39116 100644 --- a/src/Bloc/BlNullVerticalAlignment.class.st +++ b/src/Bloc/BlNullVerticalAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlNullVerticalAlignment', #superclass : 'BlNullAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlOMouseProcessor.class.st b/src/Bloc/BlOMouseProcessor.class.st index 1893e8a42..91ec14742 100644 --- a/src/Bloc/BlOMouseProcessor.class.st +++ b/src/Bloc/BlOMouseProcessor.class.st @@ -21,7 +21,6 @@ Class { 'dragState', 'previousMouseDownEvent' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlOSpace.class.st b/src/Bloc/BlOSpace.class.st index 6c19774b2..8ad78cfa3 100644 --- a/src/Bloc/BlOSpace.class.st +++ b/src/Bloc/BlOSpace.class.st @@ -6,7 +6,6 @@ It should be removed as soon as we convert all the examples as tests and move ev Class { #name : 'BlOSpace', #superclass : 'BlSpace', - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlOSpaceFrame.class.st b/src/Bloc/BlOSpaceFrame.class.st index 1c085116a..2e8c36ab6 100644 --- a/src/Bloc/BlOSpaceFrame.class.st +++ b/src/Bloc/BlOSpaceFrame.class.st @@ -19,7 +19,6 @@ Class { #name : 'BlOSpaceFrame', #superclass : 'BlSpaceFrame', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlObjectPool.class.st b/src/Bloc/BlObjectPool.class.st index 7a27c1592..d1f4b9808 100644 --- a/src/Bloc/BlObjectPool.class.st +++ b/src/Bloc/BlObjectPool.class.st @@ -5,7 +5,6 @@ I represent a pool of objects Class { #name : 'BlObjectPool', #superclass : 'Object', - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlOnActionHandler.class.st b/src/Bloc/BlOnActionHandler.class.st index 4f29764c2..2cf47b40f 100644 --- a/src/Bloc/BlOnActionHandler.class.st +++ b/src/Bloc/BlOnActionHandler.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'action' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlOutskirts.class.st b/src/Bloc/BlOutskirts.class.st index e7f5c797d..1e625d1cb 100644 --- a/src/Bloc/BlOutskirts.class.st +++ b/src/Bloc/BlOutskirts.class.st @@ -9,7 +9,6 @@ Class { 'Inside', 'Outside' ], - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlOutskirtsCentered.class.st b/src/Bloc/BlOutskirtsCentered.class.st index 8c8e70b99..f46581c47 100644 --- a/src/Bloc/BlOutskirtsCentered.class.st +++ b/src/Bloc/BlOutskirtsCentered.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlOutskirtsCentered', #superclass : 'BlOutskirts', - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlOutskirtsInside.class.st b/src/Bloc/BlOutskirtsInside.class.st index 8ee5b8c05..14392a675 100644 --- a/src/Bloc/BlOutskirtsInside.class.st +++ b/src/Bloc/BlOutskirtsInside.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlOutskirtsInside', #superclass : 'BlOutskirts', - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlOutskirtsOutside.class.st b/src/Bloc/BlOutskirtsOutside.class.st index 2d4dbeaa3..36df0362d 100644 --- a/src/Bloc/BlOutskirtsOutside.class.st +++ b/src/Bloc/BlOutskirtsOutside.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlOutskirtsOutside', #superclass : 'BlOutskirts', - #category : 'Bloc-Basic-Border', #package : 'Bloc', #tag : 'Basic-Border' } diff --git a/src/Bloc/BlOverlayAboveEffect.class.st b/src/Bloc/BlOverlayAboveEffect.class.st index 775a7f205..ef107fce6 100644 --- a/src/Bloc/BlOverlayAboveEffect.class.st +++ b/src/Bloc/BlOverlayAboveEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlOverlayAboveEffect', #superclass : 'BlOverlayEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlOverlayBelowEffect.class.st b/src/Bloc/BlOverlayBelowEffect.class.st index 30560c3f9..76aceda68 100644 --- a/src/Bloc/BlOverlayBelowEffect.class.st +++ b/src/Bloc/BlOverlayBelowEffect.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlOverlayBelowEffect', #superclass : 'BlOverlayEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlOverlayEffect.class.st b/src/Bloc/BlOverlayEffect.class.st index e5ec440ac..f2ab02310 100644 --- a/src/Bloc/BlOverlayEffect.class.st +++ b/src/Bloc/BlOverlayEffect.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'paint' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlOverlayElement.class.st b/src/Bloc/BlOverlayElement.class.st index fc1c7b3f3..bd64129f9 100644 --- a/src/Bloc/BlOverlayElement.class.st +++ b/src/Bloc/BlOverlayElement.class.st @@ -16,7 +16,6 @@ Class { 'overlayListener', 'referenceElement' ], - #category : 'Bloc-Overlay', #package : 'Bloc', #tag : 'Overlay' } diff --git a/src/Bloc/BlOverlayListener.class.st b/src/Bloc/BlOverlayListener.class.st index e5c92935b..63bb18cd3 100644 --- a/src/Bloc/BlOverlayListener.class.st +++ b/src/Bloc/BlOverlayListener.class.st @@ -9,7 +9,6 @@ Class { 'overlayElement', 'attachmentsCount' ], - #category : 'Bloc-Overlay', #package : 'Bloc', #tag : 'Overlay' } diff --git a/src/Bloc/BlPaint.class.st b/src/Bloc/BlPaint.class.st index c74da1e15..41f48259c 100644 --- a/src/Bloc/BlPaint.class.st +++ b/src/Bloc/BlPaint.class.st @@ -10,7 +10,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlPaintBackground.class.st b/src/Bloc/BlPaintBackground.class.st index 234d439ff..76b8838df 100644 --- a/src/Bloc/BlPaintBackground.class.st +++ b/src/Bloc/BlPaintBackground.class.st @@ -12,7 +12,6 @@ Class { #instVars : [ 'paint' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlPaintBackgroundBuilder.class.st b/src/Bloc/BlPaintBackgroundBuilder.class.st index 33d8b84d8..edb548cc4 100644 --- a/src/Bloc/BlPaintBackgroundBuilder.class.st +++ b/src/Bloc/BlPaintBackgroundBuilder.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'paint' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlParallelUniverse.class.st b/src/Bloc/BlParallelUniverse.class.st index 29f315e0e..745332afa 100644 --- a/src/Bloc/BlParallelUniverse.class.st +++ b/src/Bloc/BlParallelUniverse.class.st @@ -21,9 +21,7 @@ Class { 'Universes', 'UniversesMutex' ], - #category : 'Bloc-Universe - Parallel', - #package : 'Bloc', - #tag : 'Universe - Parallel' + #category : #'Bloc-Universe - Parallel' } { #category : 'accessing' } @@ -480,7 +478,6 @@ BlParallelUniverse >> snapshot: save andQuit: quit [ { #category : 'api - spaces' } BlParallelUniverse >> spaces [ - ^ spaceManager spaces ] diff --git a/src/Bloc/BlParallelUniverseDeferredActionAddedSignal.class.st b/src/Bloc/BlParallelUniverseDeferredActionAddedSignal.class.st index 900b6de1d..966716e40 100644 --- a/src/Bloc/BlParallelUniverseDeferredActionAddedSignal.class.st +++ b/src/Bloc/BlParallelUniverseDeferredActionAddedSignal.class.st @@ -5,7 +5,6 @@ I am sent when a there was a deferred action added to the universe using `defer: Class { #name : 'BlParallelUniverseDeferredActionAddedSignal', #superclass : 'BlParallelUniverseSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseHostSpaceCreatedSignal.class.st b/src/Bloc/BlParallelUniverseHostSpaceCreatedSignal.class.st index 029e06533..90e1ebe9e 100644 --- a/src/Bloc/BlParallelUniverseHostSpaceCreatedSignal.class.st +++ b/src/Bloc/BlParallelUniverseHostSpaceCreatedSignal.class.st @@ -5,7 +5,6 @@ Is sent after a host space was created and assigned to the space Class { #name : 'BlParallelUniverseHostSpaceCreatedSignal', #superclass : 'BlParallelUniverseSpaceSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseHostSpaceShownSignal.class.st b/src/Bloc/BlParallelUniverseHostSpaceShownSignal.class.st index 922526608..2eb48dcc7 100644 --- a/src/Bloc/BlParallelUniverseHostSpaceShownSignal.class.st +++ b/src/Bloc/BlParallelUniverseHostSpaceShownSignal.class.st @@ -5,7 +5,6 @@ Is sent after a host space is shown Class { #name : 'BlParallelUniverseHostSpaceShownSignal', #superclass : 'BlParallelUniverseSpaceSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseHostStartRequestSignal.class.st b/src/Bloc/BlParallelUniverseHostStartRequestSignal.class.st index 16843c94f..b6e938c6b 100644 --- a/src/Bloc/BlParallelUniverseHostStartRequestSignal.class.st +++ b/src/Bloc/BlParallelUniverseHostStartRequestSignal.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'host' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseHostStartedSignal.class.st b/src/Bloc/BlParallelUniverseHostStartedSignal.class.st index 263fa5d0b..bd55df82f 100644 --- a/src/Bloc/BlParallelUniverseHostStartedSignal.class.st +++ b/src/Bloc/BlParallelUniverseHostStartedSignal.class.st @@ -9,7 +9,6 @@ Class { 'host', 'isRunning' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseOpenSpaceRequestSignal.class.st b/src/Bloc/BlParallelUniverseOpenSpaceRequestSignal.class.st index e8e576805..b6984e9cb 100644 --- a/src/Bloc/BlParallelUniverseOpenSpaceRequestSignal.class.st +++ b/src/Bloc/BlParallelUniverseOpenSpaceRequestSignal.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'isRunning' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseRunDeferredActionSignal.class.st b/src/Bloc/BlParallelUniverseRunDeferredActionSignal.class.st index 47c9b800e..88727415c 100644 --- a/src/Bloc/BlParallelUniverseRunDeferredActionSignal.class.st +++ b/src/Bloc/BlParallelUniverseRunDeferredActionSignal.class.st @@ -5,7 +5,6 @@ Is sent when a universe performed a deferred action Class { #name : 'BlParallelUniverseRunDeferredActionSignal', #superclass : 'BlParallelUniverseSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseSignal.class.st b/src/Bloc/BlParallelUniverseSignal.class.st index eea733a1c..3ae4ccf97 100644 --- a/src/Bloc/BlParallelUniverseSignal.class.st +++ b/src/Bloc/BlParallelUniverseSignal.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'universeId' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseSpaceAddedSignal.class.st b/src/Bloc/BlParallelUniverseSpaceAddedSignal.class.st index 2d9512509..7a92f08ff 100644 --- a/src/Bloc/BlParallelUniverseSpaceAddedSignal.class.st +++ b/src/Bloc/BlParallelUniverseSpaceAddedSignal.class.st @@ -5,7 +5,6 @@ Is sent when a space was added to the space manager in a universe Class { #name : 'BlParallelUniverseSpaceAddedSignal', #superclass : 'BlParallelUniverseSpaceSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseSpaceDispatchAddedToSceneSignal.class.st b/src/Bloc/BlParallelUniverseSpaceDispatchAddedToSceneSignal.class.st index 41c0f0a21..05f0d4175 100644 --- a/src/Bloc/BlParallelUniverseSpaceDispatchAddedToSceneSignal.class.st +++ b/src/Bloc/BlParallelUniverseSpaceDispatchAddedToSceneSignal.class.st @@ -5,7 +5,6 @@ Is sent after we let children know that they were added to the scene graph Class { #name : 'BlParallelUniverseSpaceDispatchAddedToSceneSignal', #superclass : 'BlParallelUniverseSpaceSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseSpaceRootAssignedSignal.class.st b/src/Bloc/BlParallelUniverseSpaceRootAssignedSignal.class.st index 246fa2c9a..c669e8208 100644 --- a/src/Bloc/BlParallelUniverseSpaceRootAssignedSignal.class.st +++ b/src/Bloc/BlParallelUniverseSpaceRootAssignedSignal.class.st @@ -5,7 +5,6 @@ Is sent after a space is attached to the root Class { #name : 'BlParallelUniverseSpaceRootAssignedSignal', #superclass : 'BlParallelUniverseSpaceSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseSpaceSignal.class.st b/src/Bloc/BlParallelUniverseSpaceSignal.class.st index 8ae6c4e90..f5e5c00b6 100644 --- a/src/Bloc/BlParallelUniverseSpaceSignal.class.st +++ b/src/Bloc/BlParallelUniverseSpaceSignal.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'spaceId' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParallelUniverseTryToRunDeferredActionsSignal.class.st b/src/Bloc/BlParallelUniverseTryToRunDeferredActionsSignal.class.st index 7136c2f3d..82802a803 100644 --- a/src/Bloc/BlParallelUniverseTryToRunDeferredActionsSignal.class.st +++ b/src/Bloc/BlParallelUniverseTryToRunDeferredActionsSignal.class.st @@ -5,7 +5,6 @@ Is sent when a universe tries to run deferred actions Class { #name : 'BlParallelUniverseTryToRunDeferredActionsSignal', #superclass : 'BlParallelUniverseSignal', - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlParentChain.class.st b/src/Bloc/BlParentChain.class.st index a53dd876b..880e757a0 100644 --- a/src/Bloc/BlParentChain.class.st +++ b/src/Bloc/BlParentChain.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlParentChain', #superclass : 'DoubleLinkedList', - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlPathCache.class.st b/src/Bloc/BlPathCache.class.st index 80908dda3..3d14a9059 100644 --- a/src/Bloc/BlPathCache.class.st +++ b/src/Bloc/BlPathCache.class.st @@ -12,7 +12,6 @@ Class { 'geometryPath', 'strokedBounds' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlPercentUnit.class.st b/src/Bloc/BlPercentUnit.class.st index abf15396d..e61ee1f7d 100644 --- a/src/Bloc/BlPercentUnit.class.st +++ b/src/Bloc/BlPercentUnit.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPercentUnit', #superclass : 'BlUnit', - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlPerspectiveTransformation.class.st b/src/Bloc/BlPerspectiveTransformation.class.st index 11cb4b6ee..58ab048a7 100644 --- a/src/Bloc/BlPerspectiveTransformation.class.st +++ b/src/Bloc/BlPerspectiveTransformation.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'depth' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlPoint.class.st b/src/Bloc/BlPoint.class.st index 8f88bd443..e1229c679 100644 --- a/src/Bloc/BlPoint.class.st +++ b/src/Bloc/BlPoint.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlPoint2D.class.st b/src/Bloc/BlPoint2D.class.st index 52038d78b..cadcfbc17 100644 --- a/src/Bloc/BlPoint2D.class.st +++ b/src/Bloc/BlPoint2D.class.st @@ -5,7 +5,6 @@ Class { 'x', 'y' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlPoint3D.class.st b/src/Bloc/BlPoint3D.class.st index 3afd64582..905e545c7 100644 --- a/src/Bloc/BlPoint3D.class.st +++ b/src/Bloc/BlPoint3D.class.st @@ -15,7 +15,6 @@ Class { 'y', 'z' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlPoint4D.class.st b/src/Bloc/BlPoint4D.class.st index 50c5b6141..e6ae26e80 100644 --- a/src/Bloc/BlPoint4D.class.st +++ b/src/Bloc/BlPoint4D.class.st @@ -7,7 +7,6 @@ Class { 'z', 'w' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlPolygon.class.st b/src/Bloc/BlPolygon.class.st index c78d75198..4dedd8630 100644 --- a/src/Bloc/BlPolygon.class.st +++ b/src/Bloc/BlPolygon.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPolygon', #superclass : 'BlPolygonGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlPolygonGeometry.class.st b/src/Bloc/BlPolygonGeometry.class.st index 6acd9295e..bcdaef247 100644 --- a/src/Bloc/BlPolygonGeometry.class.st +++ b/src/Bloc/BlPolygonGeometry.class.st @@ -15,7 +15,6 @@ Class { #instVars : [ 'vertices' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlPolygonHitTester.class.st b/src/Bloc/BlPolygonHitTester.class.st index 8b0d21d39..77fc187d6 100644 --- a/src/Bloc/BlPolygonHitTester.class.st +++ b/src/Bloc/BlPolygonHitTester.class.st @@ -9,7 +9,6 @@ See: https://wrfranklin.org/Research/Short_Notes/pnpoly.html Class { #name : 'BlPolygonHitTester', #superclass : 'Object', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlPolyline.class.st b/src/Bloc/BlPolyline.class.st index c1e79f0c0..370664ea0 100644 --- a/src/Bloc/BlPolyline.class.st +++ b/src/Bloc/BlPolyline.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPolyline', #superclass : 'BlPolylineGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlPolylineGeometry.class.st b/src/Bloc/BlPolylineGeometry.class.st index 9d70dfb70..49c0994f3 100644 --- a/src/Bloc/BlPolylineGeometry.class.st +++ b/src/Bloc/BlPolylineGeometry.class.st @@ -15,7 +15,6 @@ Class { #instVars : [ 'vertices' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlPrimaryClickEvent.class.st b/src/Bloc/BlPrimaryClickEvent.class.st index b99bde8c3..0986f380b 100644 --- a/src/Bloc/BlPrimaryClickEvent.class.st +++ b/src/Bloc/BlPrimaryClickEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPrimaryClickEvent', #superclass : 'BlClickEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlPrimaryMouseDownEvent.class.st b/src/Bloc/BlPrimaryMouseDownEvent.class.st index cf3dbdcc3..033e0ee58 100644 --- a/src/Bloc/BlPrimaryMouseDownEvent.class.st +++ b/src/Bloc/BlPrimaryMouseDownEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPrimaryMouseDownEvent', #superclass : 'BlMouseDownEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlPrimaryMouseUpEvent.class.st b/src/Bloc/BlPrimaryMouseUpEvent.class.st index 05e9cd75a..5f0037ded 100644 --- a/src/Bloc/BlPrimaryMouseUpEvent.class.st +++ b/src/Bloc/BlPrimaryMouseUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPrimaryMouseUpEvent', #superclass : 'BlMouseUpEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlProcessTelemetry.class.st b/src/Bloc/BlProcessTelemetry.class.st index 9d0ecc672..f28ca6008 100644 --- a/src/Bloc/BlProcessTelemetry.class.st +++ b/src/Bloc/BlProcessTelemetry.class.st @@ -6,7 +6,6 @@ Class { #classInstVars : [ 'DefaultTelemetryClass' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlProgressCursor.class.st b/src/Bloc/BlProgressCursor.class.st index 3c21579ce..27d09a19a 100644 --- a/src/Bloc/BlProgressCursor.class.st +++ b/src/Bloc/BlProgressCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlProgressCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlPtUnit.class.st b/src/Bloc/BlPtUnit.class.st index b48e360ae..5945929e2 100644 --- a/src/Bloc/BlPtUnit.class.st +++ b/src/Bloc/BlPtUnit.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPtUnit', #superclass : 'BlUnit', - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlPulseEvent.class.st b/src/Bloc/BlPulseEvent.class.st index c2d795d38..cfacca5b9 100644 --- a/src/Bloc/BlPulseEvent.class.st +++ b/src/Bloc/BlPulseEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlPulseEvent', #superclass : 'BlEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlQuaternion.class.st b/src/Bloc/BlQuaternion.class.st index eaf9e24e0..8f0f6e0fd 100644 --- a/src/Bloc/BlQuaternion.class.st +++ b/src/Bloc/BlQuaternion.class.st @@ -16,7 +16,6 @@ Class { 'z', 'w' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlQuinticInterpolator.class.st b/src/Bloc/BlQuinticInterpolator.class.st index a6a7d8ec2..ba8c79834 100644 --- a/src/Bloc/BlQuinticInterpolator.class.st +++ b/src/Bloc/BlQuinticInterpolator.class.st @@ -12,7 +12,6 @@ It can be simplified to Class { #name : 'BlQuinticInterpolator', #superclass : 'BlInterpolator', - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlRadialGradientPaint.class.st b/src/Bloc/BlRadialGradientPaint.class.st index d2b6cb600..55e4f72a9 100644 --- a/src/Bloc/BlRadialGradientPaint.class.st +++ b/src/Bloc/BlRadialGradientPaint.class.st @@ -5,7 +5,6 @@ Class { 'center', 'radius' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlRay.class.st b/src/Bloc/BlRay.class.st index cf2a3c473..11400cba8 100644 --- a/src/Bloc/BlRay.class.st +++ b/src/Bloc/BlRay.class.st @@ -13,7 +13,6 @@ Class { 'point', 'vector' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlRealTime.class.st b/src/Bloc/BlRealTime.class.st index 6af53c00f..02e86f640 100644 --- a/src/Bloc/BlRealTime.class.st +++ b/src/Bloc/BlRealTime.class.st @@ -11,7 +11,6 @@ I am a just a traditional real time. Class { #name : 'BlRealTime', #superclass : 'BlTime', - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlRectangle.class.st b/src/Bloc/BlRectangle.class.st index a75ad579a..733bf82f9 100644 --- a/src/Bloc/BlRectangle.class.st +++ b/src/Bloc/BlRectangle.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlRectangle', #superclass : 'BlRoundedRectangleGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlRectangleGeometry.class.st b/src/Bloc/BlRectangleGeometry.class.st index f142218a2..16f1544ed 100644 --- a/src/Bloc/BlRectangleGeometry.class.st +++ b/src/Bloc/BlRectangleGeometry.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlRectangleGeometry', #superclass : 'BlElementGeometry', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlReflectionTransformation.class.st b/src/Bloc/BlReflectionTransformation.class.st index 6cabaeee6..ca4ffcd09 100644 --- a/src/Bloc/BlReflectionTransformation.class.st +++ b/src/Bloc/BlReflectionTransformation.class.st @@ -17,7 +17,6 @@ Class { #instVars : [ 'reflection' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlRelativeAlignment.class.st b/src/Bloc/BlRelativeAlignment.class.st index 1dbc306e4..15bc16b4e 100644 --- a/src/Bloc/BlRelativeAlignment.class.st +++ b/src/Bloc/BlRelativeAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlRelativeAlignment', #superclass : 'BlElementAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlRelativeElevation.class.st b/src/Bloc/BlRelativeElevation.class.st index 6e832bd76..2301ec629 100644 --- a/src/Bloc/BlRelativeElevation.class.st +++ b/src/Bloc/BlRelativeElevation.class.st @@ -7,7 +7,6 @@ Note: Relative elevation can be negative! Class { #name : 'BlRelativeElevation', #superclass : 'BlElevation', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlRemUnit.class.st b/src/Bloc/BlRemUnit.class.st index fc1d71d9c..8d89969e5 100644 --- a/src/Bloc/BlRemUnit.class.st +++ b/src/Bloc/BlRemUnit.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlRemUnit', #superclass : 'BlUnit', - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlRepeatedTask.class.st b/src/Bloc/BlRepeatedTask.class.st index 4f83afff9..3b764aeb5 100644 --- a/src/Bloc/BlRepeatedTask.class.st +++ b/src/Bloc/BlRepeatedTask.class.st @@ -14,7 +14,6 @@ Class { 'previousRunTime', 'isRunning' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlRepeatedTaskAction.class.st b/src/Bloc/BlRepeatedTaskAction.class.st index 428d891b1..360c0602d 100644 --- a/src/Bloc/BlRepeatedTaskAction.class.st +++ b/src/Bloc/BlRepeatedTaskAction.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'action' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlResizeBottomCursor.class.st b/src/Bloc/BlResizeBottomCursor.class.st index 5eb81e0b8..7156c9ec3 100644 --- a/src/Bloc/BlResizeBottomCursor.class.st +++ b/src/Bloc/BlResizeBottomCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeBottomCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeBottomLeftCursor.class.st b/src/Bloc/BlResizeBottomLeftCursor.class.st index 210f603b8..188416599 100644 --- a/src/Bloc/BlResizeBottomLeftCursor.class.st +++ b/src/Bloc/BlResizeBottomLeftCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeBottomLeftCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeBottomRightCursor.class.st b/src/Bloc/BlResizeBottomRightCursor.class.st index 68ab1d046..c86a37b08 100644 --- a/src/Bloc/BlResizeBottomRightCursor.class.st +++ b/src/Bloc/BlResizeBottomRightCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeBottomRightCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeColumnCursor.class.st b/src/Bloc/BlResizeColumnCursor.class.st index 51185b924..f97b43a9b 100644 --- a/src/Bloc/BlResizeColumnCursor.class.st +++ b/src/Bloc/BlResizeColumnCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeColumnCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeLeftCursor.class.st b/src/Bloc/BlResizeLeftCursor.class.st index 032888233..00e302c6c 100644 --- a/src/Bloc/BlResizeLeftCursor.class.st +++ b/src/Bloc/BlResizeLeftCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeLeftCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeRightCursor.class.st b/src/Bloc/BlResizeRightCursor.class.st index efdf87583..bdb54e16d 100644 --- a/src/Bloc/BlResizeRightCursor.class.st +++ b/src/Bloc/BlResizeRightCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeRightCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeRowCursor.class.st b/src/Bloc/BlResizeRowCursor.class.st index 065ae69b5..2c5e57ad3 100644 --- a/src/Bloc/BlResizeRowCursor.class.st +++ b/src/Bloc/BlResizeRowCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeRowCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeTopCursor.class.st b/src/Bloc/BlResizeTopCursor.class.st index cacb86949..51b42b61e 100644 --- a/src/Bloc/BlResizeTopCursor.class.st +++ b/src/Bloc/BlResizeTopCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeTopCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeTopLeftCursor.class.st b/src/Bloc/BlResizeTopLeftCursor.class.st index 53857d025..fa51d75ff 100644 --- a/src/Bloc/BlResizeTopLeftCursor.class.st +++ b/src/Bloc/BlResizeTopLeftCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeTopLeftCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlResizeTopRightCursor.class.st b/src/Bloc/BlResizeTopRightCursor.class.st index fdbc9a6ba..60153ac9a 100644 --- a/src/Bloc/BlResizeTopRightCursor.class.st +++ b/src/Bloc/BlResizeTopRightCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlResizeTopRightCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlRightAlignment.class.st b/src/Bloc/BlRightAlignment.class.st index f9c379f51..0e5cde43f 100644 --- a/src/Bloc/BlRightAlignment.class.st +++ b/src/Bloc/BlRightAlignment.class.st @@ -6,7 +6,6 @@ See BlLayoutAlignment for more info. Class { #name : 'BlRightAlignment', #superclass : 'BlHorizontalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlRope.class.st b/src/Bloc/BlRope.class.st index 6ce5aa860..c0c90576f 100644 --- a/src/Bloc/BlRope.class.st +++ b/src/Bloc/BlRope.class.st @@ -16,7 +16,6 @@ Class { #superclass : 'Object', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlRopeIterator.class.st b/src/Bloc/BlRopeIterator.class.st index 03d6b9f94..d1feb38fa 100644 --- a/src/Bloc/BlRopeIterator.class.st +++ b/src/Bloc/BlRopeIterator.class.st @@ -15,7 +15,6 @@ Class { 'start', 'end' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlRopeableCollectionFile.class.st b/src/Bloc/BlRopeableCollectionFile.class.st index 4c4d547ec..42846d610 100644 --- a/src/Bloc/BlRopeableCollectionFile.class.st +++ b/src/Bloc/BlRopeableCollectionFile.class.st @@ -59,7 +59,6 @@ Class { 'bufferedSize', 'haveSize' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlRopeableCollectionFileFinalizer.class.st b/src/Bloc/BlRopeableCollectionFileFinalizer.class.st index 961682137..f2060f8d5 100644 --- a/src/Bloc/BlRopeableCollectionFileFinalizer.class.st +++ b/src/Bloc/BlRopeableCollectionFileFinalizer.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'binaryStream' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlRotationTransformation.class.st b/src/Bloc/BlRotationTransformation.class.st index 6b724bb18..8f00feb55 100644 --- a/src/Bloc/BlRotationTransformation.class.st +++ b/src/Bloc/BlRotationTransformation.class.st @@ -12,7 +12,6 @@ Class { 'angle', 'axis' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlRoundedRectangleGeometry.class.st b/src/Bloc/BlRoundedRectangleGeometry.class.st index 334e7487e..e8290ce0a 100644 --- a/src/Bloc/BlRoundedRectangleGeometry.class.st +++ b/src/Bloc/BlRoundedRectangleGeometry.class.st @@ -16,7 +16,6 @@ Class { 'cornerRadii', 'center' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlScalingTransformation.class.st b/src/Bloc/BlScalingTransformation.class.st index 6dc1f74bd..cbe0d6e50 100644 --- a/src/Bloc/BlScalingTransformation.class.st +++ b/src/Bloc/BlScalingTransformation.class.st @@ -13,7 +13,6 @@ Class { #instVars : [ 'scale' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlSecondaryClickEvent.class.st b/src/Bloc/BlSecondaryClickEvent.class.st index 9ccb80679..05947d371 100644 --- a/src/Bloc/BlSecondaryClickEvent.class.st +++ b/src/Bloc/BlSecondaryClickEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSecondaryClickEvent', #superclass : 'BlClickEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlSecondaryMouseDownEvent.class.st b/src/Bloc/BlSecondaryMouseDownEvent.class.st index dcf929da7..539d602f7 100644 --- a/src/Bloc/BlSecondaryMouseDownEvent.class.st +++ b/src/Bloc/BlSecondaryMouseDownEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSecondaryMouseDownEvent', #superclass : 'BlMouseDownEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlSecondaryMouseUpEvent.class.st b/src/Bloc/BlSecondaryMouseUpEvent.class.st index b448e9f5c..00ec6d445 100644 --- a/src/Bloc/BlSecondaryMouseUpEvent.class.st +++ b/src/Bloc/BlSecondaryMouseUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSecondaryMouseUpEvent', #superclass : 'BlMouseUpEvent', - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlSelection.class.st b/src/Bloc/BlSelection.class.st index 5a50ea294..952105e51 100644 --- a/src/Bloc/BlSelection.class.st +++ b/src/Bloc/BlSelection.class.st @@ -10,7 +10,6 @@ Class { #classInstVars : [ 'empty' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlSelectionHandler.class.st b/src/Bloc/BlSelectionHandler.class.st index c2945b303..fd425cc2c 100644 --- a/src/Bloc/BlSelectionHandler.class.st +++ b/src/Bloc/BlSelectionHandler.class.st @@ -16,7 +16,6 @@ Class { 'container', 'selected' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlSelectionNode.class.st b/src/Bloc/BlSelectionNode.class.st index 0091376c5..b909abfd9 100644 --- a/src/Bloc/BlSelectionNode.class.st +++ b/src/Bloc/BlSelectionNode.class.st @@ -16,7 +16,6 @@ Class { 'high', 'parent' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlSelectionTree.class.st b/src/Bloc/BlSelectionTree.class.st index 9ba1b2e98..ed639985a 100644 --- a/src/Bloc/BlSelectionTree.class.st +++ b/src/Bloc/BlSelectionTree.class.st @@ -20,7 +20,6 @@ Class { #instVars : [ 'root' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlShadowEffect.class.st b/src/Bloc/BlShadowEffect.class.st index 185efb233..9890c162f 100644 --- a/src/Bloc/BlShadowEffect.class.st +++ b/src/Bloc/BlShadowEffect.class.st @@ -9,7 +9,6 @@ Class { 'color', 'offset' ], - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlSharedEventDistributor.class.st b/src/Bloc/BlSharedEventDistributor.class.st index fcd4700c3..71b3bdbe9 100644 --- a/src/Bloc/BlSharedEventDistributor.class.st +++ b/src/Bloc/BlSharedEventDistributor.class.st @@ -17,7 +17,6 @@ Class { 'handledEvents', 'shouldHandle' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlShearTransformation.class.st b/src/Bloc/BlShearTransformation.class.st index 81c8be003..12539c053 100644 --- a/src/Bloc/BlShearTransformation.class.st +++ b/src/Bloc/BlShearTransformation.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'coefficient' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlShortcut.class.st b/src/Bloc/BlShortcut.class.st index cd6aeb54d..02f716389 100644 --- a/src/Bloc/BlShortcut.class.st +++ b/src/Bloc/BlShortcut.class.st @@ -6,7 +6,6 @@ Use {{gtClass:BlShortcutWithAction}} instead Class { #name : 'BlShortcut', #superclass : 'BlShortcutWithAction', - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlShortcutEvent.class.st b/src/Bloc/BlShortcutEvent.class.st index 5af834a50..22949211b 100644 --- a/src/Bloc/BlShortcutEvent.class.st +++ b/src/Bloc/BlShortcutEvent.class.st @@ -22,7 +22,6 @@ Class { 'buffer', 'isRepeated' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlShortcutHandler.class.st b/src/Bloc/BlShortcutHandler.class.st index 8ba06429c..8d152fd38 100644 --- a/src/Bloc/BlShortcutHandler.class.st +++ b/src/Bloc/BlShortcutHandler.class.st @@ -10,7 +10,6 @@ Class { #superclass : 'BlBasicEventHandler', #traits : 'TBlDebug', #classTraits : 'TBlDebug classTrait', - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlShortcutHandlerWithShortcuts.class.st b/src/Bloc/BlShortcutHandlerWithShortcuts.class.st index 928e6f691..b604e88d4 100644 --- a/src/Bloc/BlShortcutHandlerWithShortcuts.class.st +++ b/src/Bloc/BlShortcutHandlerWithShortcuts.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'shortcutRegistry' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlShortcutHandlerWithoutShortcuts.class.st b/src/Bloc/BlShortcutHandlerWithoutShortcuts.class.st index 5bd66d719..d367c7d75 100644 --- a/src/Bloc/BlShortcutHandlerWithoutShortcuts.class.st +++ b/src/Bloc/BlShortcutHandlerWithoutShortcuts.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlShortcutRegistry.class.st b/src/Bloc/BlShortcutRegistry.class.st index 6e7291a63..63ef0e26b 100644 --- a/src/Bloc/BlShortcutRegistry.class.st +++ b/src/Bloc/BlShortcutRegistry.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'shortcuts' ], - #category : 'Bloc-Events-Handler', #package : 'Bloc', #tag : 'Events-Handler' } diff --git a/src/Bloc/BlShortcutWithAction.class.st b/src/Bloc/BlShortcutWithAction.class.st index 307199571..59baa32f7 100644 --- a/src/Bloc/BlShortcutWithAction.class.st +++ b/src/Bloc/BlShortcutWithAction.class.st @@ -23,7 +23,6 @@ Class { 'description', 'action' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlSigmoid.class.st b/src/Bloc/BlSigmoid.class.st index 681de2643..0401b7095 100644 --- a/src/Bloc/BlSigmoid.class.st +++ b/src/Bloc/BlSigmoid.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSigmoid', #superclass : 'BlSigmoidGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlSigmoidGeometry.class.st b/src/Bloc/BlSigmoidGeometry.class.st index 81db3da93..0039efc76 100644 --- a/src/Bloc/BlSigmoidGeometry.class.st +++ b/src/Bloc/BlSigmoidGeometry.class.st @@ -15,7 +15,6 @@ Class { 'HorizontalOrientation', 'VerticalOrientation' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlSimpleShadowEffect.class.st b/src/Bloc/BlSimpleShadowEffect.class.st index 83238774c..b2f88d264 100644 --- a/src/Bloc/BlSimpleShadowEffect.class.st +++ b/src/Bloc/BlSimpleShadowEffect.class.st @@ -5,7 +5,6 @@ I am very simple shadow effect. I just render a plain flat colored geometry of a Class { #name : 'BlSimpleShadowEffect', #superclass : 'BlShadowEffect', - #category : 'Bloc-Effect', #package : 'Bloc', #tag : 'Effect' } diff --git a/src/Bloc/BlSimulatedTime.class.st b/src/Bloc/BlSimulatedTime.class.st index b22ec1605..0ea381aa0 100644 --- a/src/Bloc/BlSimulatedTime.class.st +++ b/src/Bloc/BlSimulatedTime.class.st @@ -16,7 +16,6 @@ Class { #instVars : [ 'date' ], - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlSineInterpolator.class.st b/src/Bloc/BlSineInterpolator.class.st index 2d3bd2b7a..748f413ab 100644 --- a/src/Bloc/BlSineInterpolator.class.st +++ b/src/Bloc/BlSineInterpolator.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'range' ], - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlSingleErrorHandler.class.st b/src/Bloc/BlSingleErrorHandler.class.st index d909ab910..78009ffa0 100644 --- a/src/Bloc/BlSingleErrorHandler.class.st +++ b/src/Bloc/BlSingleErrorHandler.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'error' ], - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlSingleKeyCombination.class.st b/src/Bloc/BlSingleKeyCombination.class.st index 4ebbe7626..c0ca478b0 100644 --- a/src/Bloc/BlSingleKeyCombination.class.st +++ b/src/Bloc/BlSingleKeyCombination.class.st @@ -34,7 +34,6 @@ Class { #instVars : [ 'key' ], - #category : 'Bloc-Events-KeyBinding', #package : 'Bloc', #tag : 'Events-KeyBinding' } diff --git a/src/Bloc/BlSingularMatrixError.class.st b/src/Bloc/BlSingularMatrixError.class.st index a8d94a6ad..6cd3761bc 100644 --- a/src/Bloc/BlSingularMatrixError.class.st +++ b/src/Bloc/BlSingularMatrixError.class.st @@ -5,7 +5,6 @@ I am signaled when matrix is singular and therefore can not be used for mathemat Class { #name : 'BlSingularMatrixError', #superclass : 'ArithmeticError', - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlSpace.class.st b/src/Bloc/BlSpace.class.st index f3775a4c7..29b498d32 100644 --- a/src/Bloc/BlSpace.class.st +++ b/src/Bloc/BlSpace.class.st @@ -62,7 +62,6 @@ Class { #classVars : [ 'UniqueIdGenerator' ], - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlSpaceCloseRequest.class.st b/src/Bloc/BlSpaceCloseRequest.class.st index 65dd63bec..c717efa6e 100644 --- a/src/Bloc/BlSpaceCloseRequest.class.st +++ b/src/Bloc/BlSpaceCloseRequest.class.st @@ -12,7 +12,6 @@ After that space sents an actual BlSpaceClosedEvent that indicates that windows Class { #name : 'BlSpaceCloseRequest', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceClosedEvent.class.st b/src/Bloc/BlSpaceClosedEvent.class.st index c45b24447..0eb654c12 100644 --- a/src/Bloc/BlSpaceClosedEvent.class.st +++ b/src/Bloc/BlSpaceClosedEvent.class.st @@ -22,9 +22,7 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Events-Type-Space', - #package : 'Bloc', - #tag : 'Events-Type-Space' + #category : #'Bloc-Events-Type-Space' } { #category : 'sending' } @@ -34,7 +32,6 @@ BlSpaceClosedEvent >> sendTo: anObject [ { #category : 'accessing' } BlSpaceClosedEvent >> space [ - ^ space ] diff --git a/src/Bloc/BlSpaceDestroyedEvent.class.st b/src/Bloc/BlSpaceDestroyedEvent.class.st index 8f9f52b23..496b5c4f8 100644 --- a/src/Bloc/BlSpaceDestroyedEvent.class.st +++ b/src/Bloc/BlSpaceDestroyedEvent.class.st @@ -10,14 +10,11 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Events-Type-Space', - #package : 'Bloc', - #tag : 'Events-Type-Space' + #category : #'Bloc-Events-Type-Space' } { #category : 'accessing' } BlSpaceDestroyedEvent >> space [ - ^ space ] diff --git a/src/Bloc/BlSpaceDetachedEvent.class.st b/src/Bloc/BlSpaceDetachedEvent.class.st index 234ed9342..e0a668f58 100644 --- a/src/Bloc/BlSpaceDetachedEvent.class.st +++ b/src/Bloc/BlSpaceDetachedEvent.class.st @@ -7,7 +7,6 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceDragCancelEvent.class.st b/src/Bloc/BlSpaceDragCancelEvent.class.st index 56a3c8077..2d9f886f5 100644 --- a/src/Bloc/BlSpaceDragCancelEvent.class.st +++ b/src/Bloc/BlSpaceDragCancelEvent.class.st @@ -5,7 +5,6 @@ Class { 'delegate', 'position' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceDragLiftEvent.class.st b/src/Bloc/BlSpaceDragLiftEvent.class.st index a8fa8908b..ab9a44389 100644 --- a/src/Bloc/BlSpaceDragLiftEvent.class.st +++ b/src/Bloc/BlSpaceDragLiftEvent.class.st @@ -5,7 +5,6 @@ Class { 'delegate', 'position' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceEvent.class.st b/src/Bloc/BlSpaceEvent.class.st index d32fdc2ff..ae6cc87f9 100644 --- a/src/Bloc/BlSpaceEvent.class.st +++ b/src/Bloc/BlSpaceEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceEvent', #superclass : 'BlEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceEventListener.class.st b/src/Bloc/BlSpaceEventListener.class.st index 9956f8276..1eb17c1d2 100644 --- a/src/Bloc/BlSpaceEventListener.class.st +++ b/src/Bloc/BlSpaceEventListener.class.st @@ -8,7 +8,6 @@ Class { 'mouseDragListener', 'dragCollectionElement' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlSpaceEventRecorder.class.st b/src/Bloc/BlSpaceEventRecorder.class.st index fc15d2810..c26825810 100644 --- a/src/Bloc/BlSpaceEventRecorder.class.st +++ b/src/Bloc/BlSpaceEventRecorder.class.st @@ -5,7 +5,6 @@ I am used to record space events coming from the host window Class { #name : 'BlSpaceEventRecorder', #superclass : 'Object', - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlSpaceEventsProcessedEvent.class.st b/src/Bloc/BlSpaceEventsProcessedEvent.class.st index 586a0ab74..3eda7e80b 100644 --- a/src/Bloc/BlSpaceEventsProcessedEvent.class.st +++ b/src/Bloc/BlSpaceEventsProcessedEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceEventsProcessedEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceExposeEvent.class.st b/src/Bloc/BlSpaceExposeEvent.class.st index 327f36d32..429fae656 100644 --- a/src/Bloc/BlSpaceExposeEvent.class.st +++ b/src/Bloc/BlSpaceExposeEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceExposeEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceFocusInEvent.class.st b/src/Bloc/BlSpaceFocusInEvent.class.st index 8ddc0bf94..f30824274 100644 --- a/src/Bloc/BlSpaceFocusInEvent.class.st +++ b/src/Bloc/BlSpaceFocusInEvent.class.st @@ -5,7 +5,6 @@ Is sent to the space when a window receives focus Class { #name : 'BlSpaceFocusInEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceFocusOutEvent.class.st b/src/Bloc/BlSpaceFocusOutEvent.class.st index 317c7ed01..9a95fa7b6 100644 --- a/src/Bloc/BlSpaceFocusOutEvent.class.st +++ b/src/Bloc/BlSpaceFocusOutEvent.class.st @@ -5,7 +5,6 @@ Is sent to the space when a window loses focus Class { #name : 'BlSpaceFocusOutEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceFrame.class.st b/src/Bloc/BlSpaceFrame.class.st index 021e1c1c3..8f66aead8 100644 --- a/src/Bloc/BlSpaceFrame.class.st +++ b/src/Bloc/BlSpaceFrame.class.st @@ -8,7 +8,6 @@ Class { 'phases', 'currentPhaseLink' ], - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameDrawingPhase.class.st b/src/Bloc/BlSpaceFrameDrawingPhase.class.st index f56ca26c1..353b37978 100644 --- a/src/Bloc/BlSpaceFrameDrawingPhase.class.st +++ b/src/Bloc/BlSpaceFrameDrawingPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameDrawingPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameDrawingValidationPhase.class.st b/src/Bloc/BlSpaceFrameDrawingValidationPhase.class.st index 506e633a3..68f5e3c64 100644 --- a/src/Bloc/BlSpaceFrameDrawingValidationPhase.class.st +++ b/src/Bloc/BlSpaceFrameDrawingValidationPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameDrawingValidationPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameEventPhase.class.st b/src/Bloc/BlSpaceFrameEventPhase.class.st index d8f53df26..53d861933 100644 --- a/src/Bloc/BlSpaceFrameEventPhase.class.st +++ b/src/Bloc/BlSpaceFrameEventPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameEventPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameHostValidationPhase.class.st b/src/Bloc/BlSpaceFrameHostValidationPhase.class.st index 0cdb61d59..ee547a26f 100644 --- a/src/Bloc/BlSpaceFrameHostValidationPhase.class.st +++ b/src/Bloc/BlSpaceFrameHostValidationPhase.class.st @@ -5,7 +5,6 @@ I make sure that a host space is valid and re-create it if needed Class { #name : 'BlSpaceFrameHostValidationPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameIdlePhase.class.st b/src/Bloc/BlSpaceFrameIdlePhase.class.st index 9a2c47827..28972728e 100644 --- a/src/Bloc/BlSpaceFrameIdlePhase.class.st +++ b/src/Bloc/BlSpaceFrameIdlePhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameIdlePhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameLayoutPhase.class.st b/src/Bloc/BlSpaceFrameLayoutPhase.class.st index 3f8b8b2a4..9bf9e4fac 100644 --- a/src/Bloc/BlSpaceFrameLayoutPhase.class.st +++ b/src/Bloc/BlSpaceFrameLayoutPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameLayoutPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFramePhase.class.st b/src/Bloc/BlSpaceFramePhase.class.st index b974f4bd2..3a08284dd 100644 --- a/src/Bloc/BlSpaceFramePhase.class.st +++ b/src/Bloc/BlSpaceFramePhase.class.st @@ -7,7 +7,6 @@ Each phase knows about its start time and send a corresponding event once the ph Class { #name : 'BlSpaceFramePhase', #superclass : 'Object', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFramePropertiesPhase.class.st b/src/Bloc/BlSpaceFramePropertiesPhase.class.st index 0dc95927d..42e5c1c96 100644 --- a/src/Bloc/BlSpaceFramePropertiesPhase.class.st +++ b/src/Bloc/BlSpaceFramePropertiesPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFramePropertiesPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameStylePhase.class.st b/src/Bloc/BlSpaceFrameStylePhase.class.st index a7f58d56b..d546720a4 100644 --- a/src/Bloc/BlSpaceFrameStylePhase.class.st +++ b/src/Bloc/BlSpaceFrameStylePhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameStylePhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameTaskPhase.class.st b/src/Bloc/BlSpaceFrameTaskPhase.class.st index ec62ac11f..35a042c22 100644 --- a/src/Bloc/BlSpaceFrameTaskPhase.class.st +++ b/src/Bloc/BlSpaceFrameTaskPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameTaskPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceFrameUnknownPhase.class.st b/src/Bloc/BlSpaceFrameUnknownPhase.class.st index 308c98c73..409d665f3 100644 --- a/src/Bloc/BlSpaceFrameUnknownPhase.class.st +++ b/src/Bloc/BlSpaceFrameUnknownPhase.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceFrameUnknownPhase', #superclass : 'BlSpaceFramePhase', - #category : 'Bloc-Space - Frame', #package : 'Bloc', #tag : 'Space - Frame' } diff --git a/src/Bloc/BlSpaceIconChangedEvent.class.st b/src/Bloc/BlSpaceIconChangedEvent.class.st index b34e4709f..eeeca7cf7 100644 --- a/src/Bloc/BlSpaceIconChangedEvent.class.st +++ b/src/Bloc/BlSpaceIconChangedEvent.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'iconStencil' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceLayoutEndEvent.class.st b/src/Bloc/BlSpaceLayoutEndEvent.class.st index 01bda1c9c..c5235a74c 100644 --- a/src/Bloc/BlSpaceLayoutEndEvent.class.st +++ b/src/Bloc/BlSpaceLayoutEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceLayoutEndEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceManager.class.st b/src/Bloc/BlSpaceManager.class.st index f31e737fb..e11215e28 100644 --- a/src/Bloc/BlSpaceManager.class.st +++ b/src/Bloc/BlSpaceManager.class.st @@ -18,7 +18,6 @@ Class { #instVars : [ 'spaces' ], - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlSpaceMaximizedEvent.class.st b/src/Bloc/BlSpaceMaximizedEvent.class.st index 94c322da1..c9b78c8a0 100644 --- a/src/Bloc/BlSpaceMaximizedEvent.class.st +++ b/src/Bloc/BlSpaceMaximizedEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceMaximizedEvent', #superclass : 'BlSpaceResizedEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceMinimizedEvent.class.st b/src/Bloc/BlSpaceMinimizedEvent.class.st index ba034e42a..324f7cde6 100644 --- a/src/Bloc/BlSpaceMinimizedEvent.class.st +++ b/src/Bloc/BlSpaceMinimizedEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceMinimizedEvent', #superclass : 'BlSpaceResizedEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceMouseEnterEvent.class.st b/src/Bloc/BlSpaceMouseEnterEvent.class.st index 51ddd7e51..57494dc96 100644 --- a/src/Bloc/BlSpaceMouseEnterEvent.class.st +++ b/src/Bloc/BlSpaceMouseEnterEvent.class.st @@ -5,7 +5,6 @@ Is sent to the space when mouse cursor enters the window Class { #name : 'BlSpaceMouseEnterEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceMouseLeaveEvent.class.st b/src/Bloc/BlSpaceMouseLeaveEvent.class.st index 389cf92a8..287496107 100644 --- a/src/Bloc/BlSpaceMouseLeaveEvent.class.st +++ b/src/Bloc/BlSpaceMouseLeaveEvent.class.st @@ -5,7 +5,6 @@ Is sent to the space when mouse cursor leaves the window Class { #name : 'BlSpaceMouseLeaveEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceMovedEvent.class.st b/src/Bloc/BlSpaceMovedEvent.class.st index 2632ed19c..b4b1de806 100644 --- a/src/Bloc/BlSpaceMovedEvent.class.st +++ b/src/Bloc/BlSpaceMovedEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'position' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpacePropertiesEndEvent.class.st b/src/Bloc/BlSpacePropertiesEndEvent.class.st index 086706c83..7d8e2a181 100644 --- a/src/Bloc/BlSpacePropertiesEndEvent.class.st +++ b/src/Bloc/BlSpacePropertiesEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpacePropertiesEndEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceRedrawRequestedEvent.class.st b/src/Bloc/BlSpaceRedrawRequestedEvent.class.st index 157633024..e4a9a27d2 100644 --- a/src/Bloc/BlSpaceRedrawRequestedEvent.class.st +++ b/src/Bloc/BlSpaceRedrawRequestedEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceRedrawRequestedEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceReference.class.st b/src/Bloc/BlSpaceReference.class.st index d57c72f33..339608178 100644 --- a/src/Bloc/BlSpaceReference.class.st +++ b/src/Bloc/BlSpaceReference.class.st @@ -17,7 +17,6 @@ When the attachment state of an element is changed from `removed` to `attached` Class { #name : 'BlSpaceReference', #superclass : 'Object', - #category : 'Bloc-Space', #package : 'Bloc', #tag : 'Space' } diff --git a/src/Bloc/BlSpaceRenderEndEvent.class.st b/src/Bloc/BlSpaceRenderEndEvent.class.st index d913ada54..385b520a9 100644 --- a/src/Bloc/BlSpaceRenderEndEvent.class.st +++ b/src/Bloc/BlSpaceRenderEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceRenderEndEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceRenderSignal.class.st b/src/Bloc/BlSpaceRenderSignal.class.st index f885c3ae6..92df0fdba 100644 --- a/src/Bloc/BlSpaceRenderSignal.class.st +++ b/src/Bloc/BlSpaceRenderSignal.class.st @@ -29,7 +29,6 @@ Class { #classVars : [ 'Ignore' ], - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlSpaceResizedEvent.class.st b/src/Bloc/BlSpaceResizedEvent.class.st index 5f8341668..5387bbe67 100644 --- a/src/Bloc/BlSpaceResizedEvent.class.st +++ b/src/Bloc/BlSpaceResizedEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'extent' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceScaleFactorChangedEvent.class.st b/src/Bloc/BlSpaceScaleFactorChangedEvent.class.st index d410b149a..f60e11770 100644 --- a/src/Bloc/BlSpaceScaleFactorChangedEvent.class.st +++ b/src/Bloc/BlSpaceScaleFactorChangedEvent.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'scaleFactor' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceShownEvent.class.st b/src/Bloc/BlSpaceShownEvent.class.st index adb910370..b642bbb14 100644 --- a/src/Bloc/BlSpaceShownEvent.class.st +++ b/src/Bloc/BlSpaceShownEvent.class.st @@ -21,7 +21,6 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceShutdownOnCloseListener.class.st b/src/Bloc/BlSpaceShutdownOnCloseListener.class.st index 9c794f96f..84195ff73 100644 --- a/src/Bloc/BlSpaceShutdownOnCloseListener.class.st +++ b/src/Bloc/BlSpaceShutdownOnCloseListener.class.st @@ -21,7 +21,6 @@ Class { #instVars : [ 'shouldSave' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlSpaceStepEvent.class.st b/src/Bloc/BlSpaceStepEvent.class.st index b1c9998e1..6c8401524 100644 --- a/src/Bloc/BlSpaceStepEvent.class.st +++ b/src/Bloc/BlSpaceStepEvent.class.st @@ -5,7 +5,6 @@ Class { 'start', 'end' ], - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceStyleEndEvent.class.st b/src/Bloc/BlSpaceStyleEndEvent.class.st index 91922bac7..2c2b5dd68 100644 --- a/src/Bloc/BlSpaceStyleEndEvent.class.st +++ b/src/Bloc/BlSpaceStyleEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceStyleEndEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceTaskQueue.class.st b/src/Bloc/BlSpaceTaskQueue.class.st index 00951a8e4..3ba8d0bbe 100644 --- a/src/Bloc/BlSpaceTaskQueue.class.st +++ b/src/Bloc/BlSpaceTaskQueue.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'space' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlSpaceTasksEndEvent.class.st b/src/Bloc/BlSpaceTasksEndEvent.class.st index 2cdc39983..4c2b34172 100644 --- a/src/Bloc/BlSpaceTasksEndEvent.class.st +++ b/src/Bloc/BlSpaceTasksEndEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceTasksEndEvent', #superclass : 'BlSpaceStepEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSpaceWakeUpEvent.class.st b/src/Bloc/BlSpaceWakeUpEvent.class.st index f8a1482e3..4fd748cc0 100644 --- a/src/Bloc/BlSpaceWakeUpEvent.class.st +++ b/src/Bloc/BlSpaceWakeUpEvent.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSpaceWakeUpEvent', #superclass : 'BlSpaceEvent', - #category : 'Bloc-Events-Type-Space', #package : 'Bloc', #tag : 'Events-Type-Space' } diff --git a/src/Bloc/BlSquare.class.st b/src/Bloc/BlSquare.class.st index 5a790f2dc..3c7471424 100644 --- a/src/Bloc/BlSquare.class.st +++ b/src/Bloc/BlSquare.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlSquare', #superclass : 'BlSquareGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlSquareGeometry.class.st b/src/Bloc/BlSquareGeometry.class.st index 6073ad69b..96de90940 100644 --- a/src/Bloc/BlSquareGeometry.class.st +++ b/src/Bloc/BlSquareGeometry.class.st @@ -5,7 +5,6 @@ Class { 'length', 'origin' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlStadium.class.st b/src/Bloc/BlStadium.class.st index 2c76ce8ac..56677860a 100644 --- a/src/Bloc/BlStadium.class.st +++ b/src/Bloc/BlStadium.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlStadium', #superclass : 'BlStadiumGeometry', - #category : 'Bloc-Basic-Geometry-Deprecated', #package : 'Bloc', #tag : 'Basic-Geometry-Deprecated' } diff --git a/src/Bloc/BlStadiumGeometry.class.st b/src/Bloc/BlStadiumGeometry.class.st index a63b7f871..3c865e3b2 100644 --- a/src/Bloc/BlStadiumGeometry.class.st +++ b/src/Bloc/BlStadiumGeometry.class.st @@ -4,7 +4,6 @@ A stadium is a geometric figure consisting of a rectangle with top and bottom le Class { #name : 'BlStadiumGeometry', #superclass : 'BlElementVectorGeometry', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlStartAlignment.class.st b/src/Bloc/BlStartAlignment.class.st index a8ecdda17..dfbb8a1e3 100644 --- a/src/Bloc/BlStartAlignment.class.st +++ b/src/Bloc/BlStartAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlStartAlignment', #superclass : 'BlRelativeAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlStaticCursor.class.st b/src/Bloc/BlStaticCursor.class.st index e7e80bf94..15ff68a27 100644 --- a/src/Bloc/BlStaticCursor.class.st +++ b/src/Bloc/BlStaticCursor.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'image' ], - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlStencil.class.st b/src/Bloc/BlStencil.class.st index eb624332a..5983ebbc3 100644 --- a/src/Bloc/BlStencil.class.st +++ b/src/Bloc/BlStencil.class.st @@ -37,7 +37,6 @@ anElement := aStencil create. Class { #name : 'BlStencil', #superclass : 'Object', - #category : 'Bloc-Stencil', #package : 'Bloc', #tag : 'Stencil' } diff --git a/src/Bloc/BlStrokeLineBevelJoin.class.st b/src/Bloc/BlStrokeLineBevelJoin.class.st index e721ac82e..50755a455 100644 --- a/src/Bloc/BlStrokeLineBevelJoin.class.st +++ b/src/Bloc/BlStrokeLineBevelJoin.class.st @@ -7,7 +7,6 @@ See BlStrokeLineJoin for other types Class { #name : 'BlStrokeLineBevelJoin', #superclass : 'BlStrokeLineJoin', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineButtCap.class.st b/src/Bloc/BlStrokeLineButtCap.class.st index 30740b326..a2b48461e 100644 --- a/src/Bloc/BlStrokeLineButtCap.class.st +++ b/src/Bloc/BlStrokeLineButtCap.class.st @@ -8,7 +8,6 @@ See BlStrokeLineCap for other types Class { #name : 'BlStrokeLineButtCap', #superclass : 'BlStrokeLineCap', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineCap.class.st b/src/Bloc/BlStrokeLineCap.class.st index f004d84fd..e16084b38 100644 --- a/src/Bloc/BlStrokeLineCap.class.st +++ b/src/Bloc/BlStrokeLineCap.class.st @@ -22,7 +22,6 @@ Class { 'round', 'square' ], - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineJoin.class.st b/src/Bloc/BlStrokeLineJoin.class.st index f1b07dd47..803fc3e8f 100644 --- a/src/Bloc/BlStrokeLineJoin.class.st +++ b/src/Bloc/BlStrokeLineJoin.class.st @@ -22,7 +22,6 @@ Class { 'miter', 'round' ], - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineMiterJoin.class.st b/src/Bloc/BlStrokeLineMiterJoin.class.st index cdbd2e8fa..236493e3c 100644 --- a/src/Bloc/BlStrokeLineMiterJoin.class.st +++ b/src/Bloc/BlStrokeLineMiterJoin.class.st @@ -8,7 +8,6 @@ See BlStrokeLineJoin for other types Class { #name : 'BlStrokeLineMiterJoin', #superclass : 'BlStrokeLineJoin', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineRoundCap.class.st b/src/Bloc/BlStrokeLineRoundCap.class.st index 194d59891..6ddfe01b1 100644 --- a/src/Bloc/BlStrokeLineRoundCap.class.st +++ b/src/Bloc/BlStrokeLineRoundCap.class.st @@ -7,7 +7,6 @@ See BlStrokeLineCap for other types Class { #name : 'BlStrokeLineRoundCap', #superclass : 'BlStrokeLineCap', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineRoundJoin.class.st b/src/Bloc/BlStrokeLineRoundJoin.class.st index cdc3c790d..ec7bb701a 100644 --- a/src/Bloc/BlStrokeLineRoundJoin.class.st +++ b/src/Bloc/BlStrokeLineRoundJoin.class.st @@ -7,7 +7,6 @@ See BlStrokeLineJoin for other types Class { #name : 'BlStrokeLineRoundJoin', #superclass : 'BlStrokeLineJoin', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeLineSquareCap.class.st b/src/Bloc/BlStrokeLineSquareCap.class.st index 36fe007ea..50c454e64 100644 --- a/src/Bloc/BlStrokeLineSquareCap.class.st +++ b/src/Bloc/BlStrokeLineSquareCap.class.st @@ -7,7 +7,6 @@ See BlStrokeLineCap for other types Class { #name : 'BlStrokeLineSquareCap', #superclass : 'BlStrokeLineCap', - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStrokeStyle.class.st b/src/Bloc/BlStrokeStyle.class.st index 19d198ee9..d63fed757 100644 --- a/src/Bloc/BlStrokeStyle.class.st +++ b/src/Bloc/BlStrokeStyle.class.st @@ -10,7 +10,6 @@ Class { 'dashArray', 'dashOffset' ], - #category : 'Bloc-Paint-Support', #package : 'Bloc', #tag : 'Paint-Support' } diff --git a/src/Bloc/BlStyles.class.st b/src/Bloc/BlStyles.class.st index 469dfc18f..db425e7e8 100644 --- a/src/Bloc/BlStyles.class.st +++ b/src/Bloc/BlStyles.class.st @@ -29,7 +29,6 @@ Class { #instVars : [ 'styles' ], - #category : 'Bloc-Basic-Style', #package : 'Bloc', #tag : 'Basic-Style' } diff --git a/src/Bloc/BlSubRope.class.st b/src/Bloc/BlSubRope.class.st index a5aded97e..0ba8b6fa0 100644 --- a/src/Bloc/BlSubRope.class.st +++ b/src/Bloc/BlSubRope.class.st @@ -10,7 +10,6 @@ Class { 'offset', 'length' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlSubRopeIterator.class.st b/src/Bloc/BlSubRopeIterator.class.st index 96785b61a..ca16f2094 100644 --- a/src/Bloc/BlSubRopeIterator.class.st +++ b/src/Bloc/BlSubRopeIterator.class.st @@ -8,7 +8,6 @@ Class { #instVars : [ 'subIterator' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlSynchronizedObjectPool.class.st b/src/Bloc/BlSynchronizedObjectPool.class.st index ca5cccc40..927eaa32d 100644 --- a/src/Bloc/BlSynchronizedObjectPool.class.st +++ b/src/Bloc/BlSynchronizedObjectPool.class.st @@ -5,7 +5,6 @@ Class { 'pool', 'monitor' ], - #category : 'Bloc-Basic-Support', #package : 'Bloc', #tag : 'Basic-Support' } diff --git a/src/Bloc/BlTask.class.st b/src/Bloc/BlTask.class.st index 85f7c53c2..1c9854c09 100644 --- a/src/Bloc/BlTask.class.st +++ b/src/Bloc/BlTask.class.st @@ -28,7 +28,6 @@ Class { #classVars : [ 'UniqueIdGenerator' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlTaskAction.class.st b/src/Bloc/BlTaskAction.class.st index dd8d11926..33c12455d 100644 --- a/src/Bloc/BlTaskAction.class.st +++ b/src/Bloc/BlTaskAction.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'action' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlTaskAtErrorSignal.class.st b/src/Bloc/BlTaskAtErrorSignal.class.st index dbc87e275..d5747f221 100644 --- a/src/Bloc/BlTaskAtErrorSignal.class.st +++ b/src/Bloc/BlTaskAtErrorSignal.class.st @@ -22,7 +22,6 @@ Class { 'message', 'task' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlTaskAtQueue.class.st b/src/Bloc/BlTaskAtQueue.class.st index f6832fe35..18961d3d7 100644 --- a/src/Bloc/BlTaskAtQueue.class.st +++ b/src/Bloc/BlTaskAtQueue.class.st @@ -42,7 +42,6 @@ Class { #classVars : [ 'Default' ], - #category : 'Bloc-DataStructure - Priority Queue', #package : 'Bloc', #tag : 'DataStructure - Priority Queue' } diff --git a/src/Bloc/BlTaskAtQueueTask.class.st b/src/Bloc/BlTaskAtQueueTask.class.st index 56db93148..cddaf6b23 100644 --- a/src/Bloc/BlTaskAtQueueTask.class.st +++ b/src/Bloc/BlTaskAtQueueTask.class.st @@ -20,7 +20,6 @@ Class { 'scheduledTime', 'queue' ], - #category : 'Bloc-DataStructure - Priority Queue', #package : 'Bloc', #tag : 'DataStructure - Priority Queue' } diff --git a/src/Bloc/BlTaskErrorHandler.class.st b/src/Bloc/BlTaskErrorHandler.class.st index 5e3887cc7..2372416c2 100644 --- a/src/Bloc/BlTaskErrorHandler.class.st +++ b/src/Bloc/BlTaskErrorHandler.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTaskErrorHandler', #superclass : 'BlSingleErrorHandler', - #category : 'Bloc-Basic-Errors', #package : 'Bloc', #tag : 'Basic-Errors' } diff --git a/src/Bloc/BlTaskExecutionSignal.class.st b/src/Bloc/BlTaskExecutionSignal.class.st index 9e573170e..fd94ee295 100644 --- a/src/Bloc/BlTaskExecutionSignal.class.st +++ b/src/Bloc/BlTaskExecutionSignal.class.st @@ -30,7 +30,6 @@ Class { 'Enabled', 'IgnoredTasks' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlTaskQueue.class.st b/src/Bloc/BlTaskQueue.class.st index 0d47f93bf..fc9ed080a 100644 --- a/src/Bloc/BlTaskQueue.class.st +++ b/src/Bloc/BlTaskQueue.class.st @@ -7,7 +7,6 @@ Class { 'tasks', 'lock' ], - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlTelemetry.class.st b/src/Bloc/BlTelemetry.class.st index 7d87f959f..3b9713df6 100644 --- a/src/Bloc/BlTelemetry.class.st +++ b/src/Bloc/BlTelemetry.class.st @@ -3,7 +3,6 @@ Class { #superclass : 'Object', #traits : 'TBlTelemetry', #classTraits : 'TBlTelemetry classTrait', - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetryLogger.class.st b/src/Bloc/BlTelemetryLogger.class.st index 994840e93..5f95569ce 100644 --- a/src/Bloc/BlTelemetryLogger.class.st +++ b/src/Bloc/BlTelemetryLogger.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'telemetryClass' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetryLoggerStarted.class.st b/src/Bloc/BlTelemetryLoggerStarted.class.st index 6a7ffd592..d470ed029 100644 --- a/src/Bloc/BlTelemetryLoggerStarted.class.st +++ b/src/Bloc/BlTelemetryLoggerStarted.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTelemetryLoggerStarted', #superclass : 'Announcement', - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetryLoggerStopped.class.st b/src/Bloc/BlTelemetryLoggerStopped.class.st index ad48e62ec..b854272c9 100644 --- a/src/Bloc/BlTelemetryLoggerStopped.class.st +++ b/src/Bloc/BlTelemetryLoggerStopped.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTelemetryLoggerStopped', #superclass : 'Announcement', - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetrySignal.class.st b/src/Bloc/BlTelemetrySignal.class.st index b828ef009..2bc8b831e 100644 --- a/src/Bloc/BlTelemetrySignal.class.st +++ b/src/Bloc/BlTelemetrySignal.class.st @@ -5,7 +5,6 @@ Class { 'task', 'telemetry' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetryTask.class.st b/src/Bloc/BlTelemetryTask.class.st index cfdd9cdad..c5aa299b2 100644 --- a/src/Bloc/BlTelemetryTask.class.st +++ b/src/Bloc/BlTelemetryTask.class.st @@ -11,7 +11,6 @@ Class { 'name', 'tasks' ], - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTelemetryTasks.class.st b/src/Bloc/BlTelemetryTasks.class.st index 82f2b971b..ee5c5831b 100644 --- a/src/Bloc/BlTelemetryTasks.class.st +++ b/src/Bloc/BlTelemetryTasks.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTelemetryTasks', #superclass : 'LinkedList', - #category : 'Bloc-Space - Telemetry', #package : 'Bloc', #tag : 'Space - Telemetry' } diff --git a/src/Bloc/BlTextCursor.class.st b/src/Bloc/BlTextCursor.class.st index 21b929eb5..f1ac29206 100644 --- a/src/Bloc/BlTextCursor.class.st +++ b/src/Bloc/BlTextCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTextCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlTextIndex.class.st b/src/Bloc/BlTextIndex.class.st index 63ead1a1b..eabe1d5d1 100644 --- a/src/Bloc/BlTextIndex.class.st +++ b/src/Bloc/BlTextIndex.class.st @@ -8,7 +8,6 @@ See BlTextIndexEOS. Class { #name : 'BlTextIndex', #superclass : 'Magnitude', - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlTextIndexEOS.class.st b/src/Bloc/BlTextIndexEOS.class.st index 16d2741ed..e7fb1c48e 100644 --- a/src/Bloc/BlTextIndexEOS.class.st +++ b/src/Bloc/BlTextIndexEOS.class.st @@ -28,7 +28,6 @@ Class { 'offset', 'approximateSize' ], - #category : 'Bloc-DataStructure - Rope', #package : 'Bloc', #tag : 'DataStructure - Rope' } diff --git a/src/Bloc/BlTextInputBuffer.class.st b/src/Bloc/BlTextInputBuffer.class.st index 1982dd4ea..c3fa87b39 100644 --- a/src/Bloc/BlTextInputBuffer.class.st +++ b/src/Bloc/BlTextInputBuffer.class.st @@ -11,7 +11,6 @@ Class { #instVars : [ 'inputs' ], - #category : 'Bloc-Space - Events', #package : 'Bloc', #tag : 'Space - Events' } diff --git a/src/Bloc/BlTextInputEvent.class.st b/src/Bloc/BlTextInputEvent.class.st index a1f26e2fd..da3676443 100644 --- a/src/Bloc/BlTextInputEvent.class.st +++ b/src/Bloc/BlTextInputEvent.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'text' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlTime.class.st b/src/Bloc/BlTime.class.st index 07e6c8978..2bd75866e 100644 --- a/src/Bloc/BlTime.class.st +++ b/src/Bloc/BlTime.class.st @@ -11,7 +11,6 @@ Class { 'frozenTime', 'frozen' ], - #category : 'Bloc-Universe', #package : 'Bloc', #tag : 'Universe' } diff --git a/src/Bloc/BlTopAlignment.class.st b/src/Bloc/BlTopAlignment.class.st index 41e64950d..f951d21f6 100644 --- a/src/Bloc/BlTopAlignment.class.st +++ b/src/Bloc/BlTopAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlTopAlignment', #superclass : 'BlVerticalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlTransformationBuilder.class.st b/src/Bloc/BlTransformationBuilder.class.st index 19d883f88..3bc76671d 100644 --- a/src/Bloc/BlTransformationBuilder.class.st +++ b/src/Bloc/BlTransformationBuilder.class.st @@ -19,7 +19,6 @@ Class { 'target', 'affineCompositeTransformation' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlTranslationTransformation.class.st b/src/Bloc/BlTranslationTransformation.class.st index 6578d4d0d..c9c1c1959 100644 --- a/src/Bloc/BlTranslationTransformation.class.st +++ b/src/Bloc/BlTranslationTransformation.class.st @@ -11,7 +11,6 @@ Class { #instVars : [ 'translation' ], - #category : 'Bloc-Basic-Transformations', #package : 'Bloc', #tag : 'Basic-Transformations' } diff --git a/src/Bloc/BlTransparentBackground.class.st b/src/Bloc/BlTransparentBackground.class.st index 3e36b46b5..0cb6cbfe8 100644 --- a/src/Bloc/BlTransparentBackground.class.st +++ b/src/Bloc/BlTransparentBackground.class.st @@ -9,7 +9,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Background', #package : 'Bloc', #tag : 'Basic-Background' } diff --git a/src/Bloc/BlTransparentPaint.class.st b/src/Bloc/BlTransparentPaint.class.st index 93476d886..5384483ef 100644 --- a/src/Bloc/BlTransparentPaint.class.st +++ b/src/Bloc/BlTransparentPaint.class.st @@ -11,7 +11,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Paint', #package : 'Bloc', #tag : 'Paint' } diff --git a/src/Bloc/BlTriangleGeometry.class.st b/src/Bloc/BlTriangleGeometry.class.st index 0c99bf727..6151017c8 100644 --- a/src/Bloc/BlTriangleGeometry.class.st +++ b/src/Bloc/BlTriangleGeometry.class.st @@ -10,7 +10,6 @@ Class { 'Right', 'Top' ], - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlUIEvent.class.st b/src/Bloc/BlUIEvent.class.st index 44eb30da2..43e37a7f4 100644 --- a/src/Bloc/BlUIEvent.class.st +++ b/src/Bloc/BlUIEvent.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'modifiers' ], - #category : 'Bloc-Events', #package : 'Bloc', #tag : 'Events' } diff --git a/src/Bloc/BlUniqueIdGenerator.class.st b/src/Bloc/BlUniqueIdGenerator.class.st index 5481eba3b..722bddad6 100644 --- a/src/Bloc/BlUniqueIdGenerator.class.st +++ b/src/Bloc/BlUniqueIdGenerator.class.st @@ -5,7 +5,6 @@ Class { 'mutex', 'nextUniqueId' ], - #category : 'Bloc-Space - Support', #package : 'Bloc', #tag : 'Space - Support' } diff --git a/src/Bloc/BlUnit.class.st b/src/Bloc/BlUnit.class.st index 84781710c..709b71bac 100644 --- a/src/Bloc/BlUnit.class.st +++ b/src/Bloc/BlUnit.class.st @@ -4,7 +4,6 @@ Class { #classInstVars : [ 'uniqueInstance' ], - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlUniverseEventListener.class.st b/src/Bloc/BlUniverseEventListener.class.st index 1c9075e70..576adf0a4 100644 --- a/src/Bloc/BlUniverseEventListener.class.st +++ b/src/Bloc/BlUniverseEventListener.class.st @@ -6,7 +6,6 @@ Class { #instVars : [ 'lastTime' ], - #category : 'Bloc-Universe - Parallel', #package : 'Bloc', #tag : 'Universe - Parallel' } diff --git a/src/Bloc/BlUseAsyncFeatures.class.st b/src/Bloc/BlUseAsyncFeatures.class.st index 4df095462..8d846827d 100644 --- a/src/Bloc/BlUseAsyncFeatures.class.st +++ b/src/Bloc/BlUseAsyncFeatures.class.st @@ -14,7 +14,6 @@ In the cases where the async should be disabled, {{gtMethod:BlUseAsyncFeatures c Class { #name : 'BlUseAsyncFeatures', #superclass : 'DynamicVariable', - #category : 'Bloc-Space - Tasks', #package : 'Bloc', #tag : 'Space - Tasks' } diff --git a/src/Bloc/BlValueWithUnit.class.st b/src/Bloc/BlValueWithUnit.class.st index d417e0866..98882bb90 100644 --- a/src/Bloc/BlValueWithUnit.class.st +++ b/src/Bloc/BlValueWithUnit.class.st @@ -12,7 +12,6 @@ Class { 'value', 'unit' ], - #category : 'Bloc-Basic-Units', #package : 'Bloc', #tag : 'Basic-Units' } diff --git a/src/Bloc/BlVector.class.st b/src/Bloc/BlVector.class.st index f35b2616a..bf9d859f3 100644 --- a/src/Bloc/BlVector.class.st +++ b/src/Bloc/BlVector.class.st @@ -32,7 +32,6 @@ Class { 'ZAxis', 'Zero' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlVector2D.class.st b/src/Bloc/BlVector2D.class.st index 2ffcb1f12..97d3182ad 100644 --- a/src/Bloc/BlVector2D.class.st +++ b/src/Bloc/BlVector2D.class.st @@ -22,7 +22,6 @@ Class { 'x', 'y' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlVector3D.class.st b/src/Bloc/BlVector3D.class.st index 08a7a1ac8..c3411c70b 100644 --- a/src/Bloc/BlVector3D.class.st +++ b/src/Bloc/BlVector3D.class.st @@ -16,7 +16,6 @@ Class { 'y', 'z' ], - #category : 'Bloc-Basic-Math', #package : 'Bloc', #tag : 'Basic-Math' } diff --git a/src/Bloc/BlVerticalAlignment.class.st b/src/Bloc/BlVerticalAlignment.class.st index 617a47bb8..c72b475d7 100644 --- a/src/Bloc/BlVerticalAlignment.class.st +++ b/src/Bloc/BlVerticalAlignment.class.st @@ -6,7 +6,6 @@ Class { 'center', 'top' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlVerticalCenterAlignment.class.st b/src/Bloc/BlVerticalCenterAlignment.class.st index 49dfd5140..2089c10f4 100644 --- a/src/Bloc/BlVerticalCenterAlignment.class.st +++ b/src/Bloc/BlVerticalCenterAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlVerticalCenterAlignment', #superclass : 'BlVerticalAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlVerticalCoordinateAlignment.class.st b/src/Bloc/BlVerticalCoordinateAlignment.class.st index 2c54cea37..e9e109ca8 100644 --- a/src/Bloc/BlVerticalCoordinateAlignment.class.st +++ b/src/Bloc/BlVerticalCoordinateAlignment.class.st @@ -34,7 +34,6 @@ Class { 'coordinate', 'relativeAlignment' ], - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlVerticalCoordinateBottomAlignment.class.st b/src/Bloc/BlVerticalCoordinateBottomAlignment.class.st index 13161d83e..8a1f71a7c 100644 --- a/src/Bloc/BlVerticalCoordinateBottomAlignment.class.st +++ b/src/Bloc/BlVerticalCoordinateBottomAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlVerticalCoordinateBottomAlignment', #superclass : 'BlVerticalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlVerticalCoordinateTopAlignment.class.st b/src/Bloc/BlVerticalCoordinateTopAlignment.class.st index 54343001f..6022f50ef 100644 --- a/src/Bloc/BlVerticalCoordinateTopAlignment.class.st +++ b/src/Bloc/BlVerticalCoordinateTopAlignment.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlVerticalCoordinateTopAlignment', #superclass : 'BlVerticalCoordinateAlignment', - #category : 'Bloc-Layouts-Alignment', #package : 'Bloc', #tag : 'Layouts-Alignment' } diff --git a/src/Bloc/BlVerticalTextCursor.class.st b/src/Bloc/BlVerticalTextCursor.class.st index b93ef9225..1bd273596 100644 --- a/src/Bloc/BlVerticalTextCursor.class.st +++ b/src/Bloc/BlVerticalTextCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlVerticalTextCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlVerticesFromRectanglesOperator.class.st b/src/Bloc/BlVerticesFromRectanglesOperator.class.st index dd6c9580b..8462356d9 100644 --- a/src/Bloc/BlVerticesFromRectanglesOperator.class.st +++ b/src/Bloc/BlVerticesFromRectanglesOperator.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlVerticesFromRectanglesOperator', #superclass : 'Object', - #category : 'Bloc-Basic-Geometry', #package : 'Bloc', #tag : 'Basic-Geometry' } diff --git a/src/Bloc/BlViscousFluidInterpolator.class.st b/src/Bloc/BlViscousFluidInterpolator.class.st index fa64c591a..1cb32c236 100644 --- a/src/Bloc/BlViscousFluidInterpolator.class.st +++ b/src/Bloc/BlViscousFluidInterpolator.class.st @@ -7,7 +7,6 @@ Class { 'FluidScale', 'InvertedExponent' ], - #category : 'Bloc-Basic-Interpolators', #package : 'Bloc', #tag : 'Basic-Interpolators' } diff --git a/src/Bloc/BlVisibility.class.st b/src/Bloc/BlVisibility.class.st index a2317530c..9db1365f4 100644 --- a/src/Bloc/BlVisibility.class.st +++ b/src/Bloc/BlVisibility.class.st @@ -19,7 +19,6 @@ Class { 'hidden', 'visible' ], - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlVisibilityGone.class.st b/src/Bloc/BlVisibilityGone.class.st index 66e9443bc..92a527b47 100644 --- a/src/Bloc/BlVisibilityGone.class.st +++ b/src/Bloc/BlVisibilityGone.class.st @@ -6,7 +6,6 @@ Once set, element should not be rendered and should not participate in layout (s Class { #name : 'BlVisibilityGone', #superclass : 'BlVisibility', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlVisibilityHidden.class.st b/src/Bloc/BlVisibilityHidden.class.st index 36593f2fe..02e61a409 100644 --- a/src/Bloc/BlVisibilityHidden.class.st +++ b/src/Bloc/BlVisibilityHidden.class.st @@ -6,7 +6,6 @@ Once set, element should not be rendered but should participate in layout and ta Class { #name : 'BlVisibilityHidden', #superclass : 'BlVisibility', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlVisibilityVisible.class.st b/src/Bloc/BlVisibilityVisible.class.st index bd5fc54cb..61621821f 100644 --- a/src/Bloc/BlVisibilityVisible.class.st +++ b/src/Bloc/BlVisibilityVisible.class.st @@ -6,7 +6,6 @@ Once set, element should be rendered and should participate in layout and take s Class { #name : 'BlVisibilityVisible', #superclass : 'BlVisibility', - #category : 'Bloc-Basic-Properties', #package : 'Bloc', #tag : 'Basic-Properties' } diff --git a/src/Bloc/BlVisualSelectionHandler.class.st b/src/Bloc/BlVisualSelectionHandler.class.st index df9fc62b5..89a3d73e6 100644 --- a/src/Bloc/BlVisualSelectionHandler.class.st +++ b/src/Bloc/BlVisualSelectionHandler.class.st @@ -10,7 +10,6 @@ Class { #instVars : [ 'selection' ], - #category : 'Bloc-Utilities - Selection', #package : 'Bloc', #tag : 'Utilities - Selection' } diff --git a/src/Bloc/BlWaitCursor.class.st b/src/Bloc/BlWaitCursor.class.st index 4f0502210..65ed5d85e 100644 --- a/src/Bloc/BlWaitCursor.class.st +++ b/src/Bloc/BlWaitCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlWaitCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlWidthEqualizer.class.st b/src/Bloc/BlWidthEqualizer.class.st index db7f9c030..dac5e6547 100644 --- a/src/Bloc/BlWidthEqualizer.class.st +++ b/src/Bloc/BlWidthEqualizer.class.st @@ -4,7 +4,6 @@ Class { #instVars : [ 'widthBlock' ], - #category : 'Bloc-Utilities - Equalizer', #package : 'Bloc', #tag : 'Utilities - Equalizer' } diff --git a/src/Bloc/BlZoomInCursor.class.st b/src/Bloc/BlZoomInCursor.class.st index 9018f19b0..6923949ec 100644 --- a/src/Bloc/BlZoomInCursor.class.st +++ b/src/Bloc/BlZoomInCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlZoomInCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/BlZoomOutCursor.class.st b/src/Bloc/BlZoomOutCursor.class.st index 52d2176af..84e53d297 100644 --- a/src/Bloc/BlZoomOutCursor.class.st +++ b/src/Bloc/BlZoomOutCursor.class.st @@ -1,7 +1,6 @@ Class { #name : 'BlZoomOutCursor', #superclass : 'BlNamedCursor', - #category : 'Bloc-Space - Cursor', #package : 'Bloc', #tag : 'Space - Cursor' } diff --git a/src/Bloc/Bloc.class.st b/src/Bloc/Bloc.class.st index b7543633e..a0c5e2455 100644 --- a/src/Bloc/Bloc.class.st +++ b/src/Bloc/Bloc.class.st @@ -13,7 +13,6 @@ Class { 'DebugModeEnabled', 'PreferableChildrenDataStructure' ], - #category : 'Bloc-Settings', #package : 'Bloc', #tag : 'Settings' } diff --git a/src/Bloc/BlockClosure.extension.st b/src/Bloc/BlockClosure.extension.st index fda38cd56..e00f59936 100644 --- a/src/Bloc/BlockClosure.extension.st +++ b/src/Bloc/BlockClosure.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'BlockClosure' } +Extension { #name : #BlockClosure } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } BlockClosure >> asBlocResolvedElementsFrom: anElement [ self argumentCount isZero ifTrue: [ ^ self value ]. @@ -10,7 +10,7 @@ BlockClosure >> asBlocResolvedElementsFrom: anElement [ aStream nextPut: eachElement ] ] ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } BlockClosure >> blocDefiningMethod [ ^ self asContext blocDefiningMethod ] diff --git a/src/Bloc/Character.extension.st b/src/Bloc/Character.extension.st index 2a6675d8b..4bccc82e5 100644 --- a/src/Bloc/Character.extension.st +++ b/src/Bloc/Character.extension.st @@ -1,11 +1,11 @@ -Extension { #name : 'Character' } +Extension { #name : #Character } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Character >> isLineBreak [ ^ self = self class cr or: [ self = self class lf or: [ self = self class nel ] ] ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Character >> isPureSeparator [ ^ self isSeparator and: [ self isLineBreak not ] ] diff --git a/src/Bloc/Collection.extension.st b/src/Bloc/Collection.extension.st index cfc5a2afd..cf2617e45 100644 --- a/src/Bloc/Collection.extension.st +++ b/src/Bloc/Collection.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'Collection' } +Extension { #name : #Collection } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Collection >> copyWithMergedAttributesWith: anotherCollectionOfAttributes [ "Answer the merge of two collections of attributes, letting anotherCollectionOfAttributes to override attributes from self, @@ -17,7 +17,7 @@ Collection >> copyWithMergedAttributesWith: anotherCollectionOfAttributes [ ^ anOrderedDictionary values ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Collection >> copyWithoutDuplicatedRopeAttributes [ "Answer a collection without duplicates from a given collection, preserving the original order" diff --git a/src/Bloc/Color.extension.st b/src/Bloc/Color.extension.st index 148c26fcd..48848953e 100644 --- a/src/Bloc/Color.extension.st +++ b/src/Bloc/Color.extension.st @@ -1,16 +1,16 @@ -Extension { #name : 'Color' } +Extension { #name : #Color } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Color >> asBlBackground [ ^ BlBackground paint: self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Color >> asBlBorder [ ^ BlBorder paint: self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Color >> asBlPaint [ ^ BlColorPaint color: self ] diff --git a/src/Bloc/Context.extension.st b/src/Bloc/Context.extension.st index 917803fc8..6203ddecf 100644 --- a/src/Bloc/Context.extension.st +++ b/src/Bloc/Context.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'Context' } +Extension { #name : #Context } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Context >> blocDefiningMethod [ "Return a CompiledMethod this context belongs to" | anOuterMostContext aCompiledCode | @@ -17,7 +17,7 @@ Context >> blocDefiningMethod [ ifFalse: [ anOuterMostContext blocDefiningMethod ] ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Context >> blocMethodDefinition [ "Return a Ring method definition for the CompiledMethod this context belongs to" diff --git a/src/Bloc/Form.extension.st b/src/Bloc/Form.extension.st index 74382379b..71de69333 100644 --- a/src/Bloc/Form.extension.st +++ b/src/Bloc/Form.extension.st @@ -1,11 +1,11 @@ -Extension { #name : 'Form' } +Extension { #name : #Form } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Form >> asBlBackground [ ^ BlBackground image: self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Form >> asElement [ ^ BlElement new size: self extent; @@ -13,7 +13,7 @@ Form >> asElement [ yourself ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Form >> asForm [ ^ self ] diff --git a/src/Bloc/KeyboardKey.extension.st b/src/Bloc/KeyboardKey.extension.st index 8d40d068e..adf3fbf98 100644 --- a/src/Bloc/KeyboardKey.extension.st +++ b/src/Bloc/KeyboardKey.extension.st @@ -1,12 +1,12 @@ -Extension { #name : 'KeyboardKey' } +Extension { #name : #KeyboardKey } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } KeyboardKey >> isShift [ ^ self = self class shiftLeft or: [ self = self class shiftRight ] ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } KeyboardKey class >> unknown [ | aKeyboardKey | diff --git a/src/Bloc/MacOSPlatform.extension.st b/src/Bloc/MacOSPlatform.extension.st index a87491c45..eaa6fd2f4 100644 --- a/src/Bloc/MacOSPlatform.extension.st +++ b/src/Bloc/MacOSPlatform.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'MacOSPlatform' } +Extension { #name : #MacOSPlatform } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } MacOSPlatform >> primaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey metaLeft; @@ -10,7 +10,7 @@ MacOSPlatform >> primaryModifier [ yourself ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } MacOSPlatform >> secondaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey controlLeft; diff --git a/src/Bloc/ManifestBloc.class.st b/src/Bloc/ManifestBloc.class.st index a54bf0e44..3b055bec5 100644 --- a/src/Bloc/ManifestBloc.class.st +++ b/src/Bloc/ManifestBloc.class.st @@ -21,7 +21,6 @@ Most recently, [feenk](https://feenk.com) has put in a ton of work, bringing the Class { #name : 'ManifestBloc', #superclass : 'PackageManifest', - #category : 'Bloc-Manifest', #package : 'Bloc', #tag : 'Manifest' } diff --git a/src/Bloc/Number.extension.st b/src/Bloc/Number.extension.st index 6d71beb4c..0323f915f 100644 --- a/src/Bloc/Number.extension.st +++ b/src/Bloc/Number.extension.st @@ -1,34 +1,34 @@ -Extension { #name : 'Number' } +Extension { #name : #Number } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> asBlocVector [ "Return a 2D vector of the receiver by using the receiver as the two dimensions." ^ BlVector x: self y: self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> asScale3D [ "Return a 3D vector representing a scale factor" ^ BlVector x: self y: self z: 1 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> asTranslate3D [ "Return a 3D vector representing a translation vector" ^ BlVector x: self y: self z: 0 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> closeTo: num epsilon: anEpsilon [ "are these two numbers close?" ^ (self - num) abs <= anEpsilon ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> scalarMultiplicate2D: aVector2D [ "Perform a scalar multiplication of a given 2D vector by me" @@ -38,7 +38,7 @@ Number >> scalarMultiplicate2D: aVector2D [ y: aVector2D y * self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> scalarMultiplicate3D: aVector3D [ "Return a new vector by performing a scalar multiplication of a given 3D vector by me." @@ -49,7 +49,7 @@ Number >> scalarMultiplicate3D: aVector3D [ z: aVector3D z * self ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Number >> timesCollect: aBlock [ ^ (1 to: self) collect: [ :anIndex | aBlock cull: anIndex ] ] diff --git a/src/Bloc/OSPlatform.extension.st b/src/Bloc/OSPlatform.extension.st index 9080c6de7..72230bfd9 100644 --- a/src/Bloc/OSPlatform.extension.st +++ b/src/Bloc/OSPlatform.extension.st @@ -1,17 +1,17 @@ -Extension { #name : 'OSPlatform' } +Extension { #name : #OSPlatform } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } OSPlatform >> defaultScrollingVelocity [ ^ 20 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } OSPlatform >> primaryModifier [ ^ self subclassResponsibility ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } OSPlatform >> secondaryModifier [ ^ self subclassResponsibility ] diff --git a/src/Bloc/Object.extension.st b/src/Bloc/Object.extension.st index fb40a8628..8cc47fd9c 100644 --- a/src/Bloc/Object.extension.st +++ b/src/Bloc/Object.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'Object' } +Extension { #name : #Object } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Object >> entryIdentifier [ "Answer the object used to identify this task. nil = unidentified (and thus can be queued multiple times)" @@ -8,13 +8,13 @@ Object >> entryIdentifier [ ^nil ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Object >> isBlocElementId [ ^ false ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Object >> ropeAttributeType [ "Return an object that is used to compare attribute by type The rule is the following: attributes of the same type must overwrite each other." diff --git a/src/Bloc/Point.extension.st b/src/Bloc/Point.extension.st index 3f1b5174c..ef4c80fdc 100644 --- a/src/Bloc/Point.extension.st +++ b/src/Bloc/Point.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'Point' } +Extension { #name : #Point } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> @ aNumber [ "Create a new 3D point with x and y represented by me and given number as z" @@ -8,27 +8,27 @@ Point >> @ aNumber [ ^ BlPoint3D x: x y: y z: aNumber ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> asBlocVector [ "Return a 2D vector of the receiver by using the receiver as the two dimensions of the vector." ^ BlVector x: x y: y ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> asScale3D [ "Return a 3D vector representing a scale factor" ^ BlVector x: self x y: self y z: 1 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> asTranslate3D [ "Return a 3D vector representing a translation vector" ^ BlVector x: self x y: self y z: 0 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> closeTo: anotherPoint epsilon: anEpsilon [ "are these two Points close?" @@ -36,7 +36,7 @@ Point >> closeTo: anotherPoint epsilon: anEpsilon [ and: [ y closeTo: anotherPoint y epsilon: anEpsilon ] ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> scalarMultiplicate2D: aVector2D [ "Perform a scalar multiplication of a given 2D vector by me" @@ -46,7 +46,7 @@ Point >> scalarMultiplicate2D: aVector2D [ y: aVector2D y * self y ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Point >> transformedOn: aBlMatrix [ diff --git a/src/Bloc/ProcessList.extension.st b/src/Bloc/ProcessList.extension.st index 477635f31..0d03a0e1c 100644 --- a/src/Bloc/ProcessList.extension.st +++ b/src/Bloc/ProcessList.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'ProcessList' } +Extension { #name : #ProcessList } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } ProcessList >> firstOrNil [ "Answer the first link or nil if the receiver is empty." ^firstLink ifNotNil: [ :fl | fl value ] diff --git a/src/Bloc/SharedPriorityUniqueQueue.class.st b/src/Bloc/SharedPriorityUniqueQueue.class.st index ca1e8168c..f6d5f9f2d 100644 --- a/src/Bloc/SharedPriorityUniqueQueue.class.st +++ b/src/Bloc/SharedPriorityUniqueQueue.class.st @@ -28,7 +28,6 @@ Some care is taken to ensure that the queue is not corrupted by some other proce Class { #name : 'SharedPriorityUniqueQueue', #superclass : 'SharedQueue', - #category : 'Bloc-DataStructure - Priority Queue', #package : 'Bloc', #tag : 'DataStructure - Priority Queue' } diff --git a/src/Bloc/String.extension.st b/src/Bloc/String.extension.st index 80f4ecbed..73c317099 100644 --- a/src/Bloc/String.extension.st +++ b/src/Bloc/String.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'String' } +Extension { #name : #String } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } String >> asBlocElementId [ ^ BlElementId named: self asSymbol diff --git a/src/Bloc/TBlAlignable.trait.st b/src/Bloc/TBlAlignable.trait.st index 56688b8a9..2be19e746 100644 --- a/src/Bloc/TBlAlignable.trait.st +++ b/src/Bloc/TBlAlignable.trait.st @@ -4,162 +4,160 @@ I add alignment api in both axis simultaneously. My users are layout related classes " Trait { - #name : 'TBlAlignable', - #category : 'Bloc-Layouts-Alignment', - #package : 'Bloc', - #tag : 'Layouts-Alignment' + #name : #TBlAlignable, + #category : 'Bloc-Layouts-Alignment' } -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignBottomCenter [ self verticalAlignment: BlElementAlignment vertical end. self horizontalAlignment: BlElementAlignment horizontal center ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignBottomLeft [ self verticalAlignment: BlElementAlignment vertical end. self horizontalAlignment: BlElementAlignment horizontal start ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignBottomRight [ self verticalAlignment: BlElementAlignment vertical end. self horizontalAlignment: BlElementAlignment horizontal end ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignCenter [ self verticalAlignment: BlElementAlignment vertical center. self horizontalAlignment: BlElementAlignment horizontal center ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignCenterLeft [ self verticalAlignment: BlElementAlignment vertical center. self horizontalAlignment: BlElementAlignment horizontal start ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignCenterRight [ self verticalAlignment: BlElementAlignment vertical center. self horizontalAlignment: BlElementAlignment horizontal end ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignNone [ self verticalAlignment: BlElementAlignment vertical null. self horizontalAlignment: BlElementAlignment horizontal null ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignTopCenter [ self verticalAlignment: BlElementAlignment vertical start. self horizontalAlignment: BlElementAlignment horizontal center ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignTopLeft [ self verticalAlignment: BlElementAlignment vertical start. self horizontalAlignment: BlElementAlignment horizontal start ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> alignTopRight [ self verticalAlignment: BlElementAlignment vertical start. self horizontalAlignment: BlElementAlignment horizontal end ] -{ #category : 'accessing' } +{ #category : #accessing } TBlAlignable >> horizontalAlignment [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlAlignable >> horizontalAlignment: aBlElementAlignment [ self explicitRequirement ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignBottomCenter [ ^ self verticalAlignment = BlElementAlignment vertical end and: [ self horizontalAlignment = BlElementAlignment horizontal center ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignBottomLeft [ ^ self verticalAlignment = BlElementAlignment vertical end and: [ self horizontalAlignment = BlElementAlignment horizontal start ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignBottomRight [ ^ self verticalAlignment = BlElementAlignment vertical end and: [ self horizontalAlignment = BlElementAlignment horizontal end ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignCenter [ ^ self verticalAlignment = BlElementAlignment vertical center and: [ self horizontalAlignment = BlElementAlignment horizontal center ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignCenterLeft [ ^ self verticalAlignment = BlElementAlignment vertical center and: [ self horizontalAlignment = BlElementAlignment horizontal start ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignCenterRight [ ^ self verticalAlignment = BlElementAlignment vertical center and: [ self horizontalAlignment = BlElementAlignment horizontal end ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignNone [ ^ self verticalAlignment = BlElementAlignment vertical null and: [ self horizontalAlignment = BlElementAlignment horizontal null ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignTopCenter [ ^ self verticalAlignment = BlElementAlignment vertical start and: [ self horizontalAlignment = BlElementAlignment horizontal center ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignTopLeft [ ^ self verticalAlignment = BlElementAlignment vertical start and: [ self horizontalAlignment = BlElementAlignment horizontal start ] ] -{ #category : 'api - alignment' } +{ #category : #'api - alignment' } TBlAlignable >> isAlignTopRight [ ^ self verticalAlignment = BlElementAlignment vertical start and: [ self horizontalAlignment = BlElementAlignment horizontal end ] ] -{ #category : 'accessing' } +{ #category : #accessing } TBlAlignable >> verticalAlignment [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlAlignable >> verticalAlignment: aBlElementAlignment [ self explicitRequirement ] diff --git a/src/Bloc/TBlAnnounceable.trait.st b/src/Bloc/TBlAnnounceable.trait.st index d3e6eba67..4cb963337 100644 --- a/src/Bloc/TBlAnnounceable.trait.st +++ b/src/Bloc/TBlAnnounceable.trait.st @@ -4,19 +4,17 @@ I'm an utility Trait for objects that own an Announcer. " Trait { - #name : 'TBlAnnounceable', - #category : 'Bloc-Basic-Support', - #package : 'Bloc', - #tag : 'Basic-Support' + #name : #TBlAnnounceable, + #category : 'Bloc-Basic-Support' } -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnounceable >> announce: anAnnouncement [ self announcerDo: [ :ann | ann announce: anAnnouncement ] ] -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnounceable >> announcerDo: aBlockClosure [ "Evaluate a given block closure with an announcer as an argument if it is initialized" @@ -24,19 +22,19 @@ TBlAnnounceable >> announcerDo: aBlockClosure [ aBlockClosure value: self privateAnnouncer ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnounceable >> ensureAnnouncer [ self explicitRequirement ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnounceable >> privateAnnouncer [ ^ self explicitRequirement ] -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnounceable >> unsubscribe: anObject [ "Unsubscribe all subscriptions of anObject from the receiver" @@ -44,14 +42,14 @@ TBlAnnounceable >> unsubscribe: anObject [ self announcerDo: [ :anAnnouncer | anAnnouncer unsubscribe: anObject ] ] -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnounceable >> whenAnnouncement: anAnnouncementClass do: aValuable [ self ensureAnnouncer. self privateAnnouncer when: anAnnouncementClass do: aValuable ] -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnounceable >> whenAnnouncement: anAnnouncementClass send: aSelector to: anObject [ self ensureAnnouncer. diff --git a/src/Bloc/TBlAnnouncerProvider.trait.st b/src/Bloc/TBlAnnouncerProvider.trait.st index 696dec68a..2d47203c4 100644 --- a/src/Bloc/TBlAnnouncerProvider.trait.st +++ b/src/Bloc/TBlAnnouncerProvider.trait.st @@ -2,50 +2,48 @@ I provide an announcer with necessary methods " Trait { - #name : 'TBlAnnouncerProvider', + #name : #TBlAnnouncerProvider, #instVars : [ 'privateAnnouncer', 'privateAnnouncerIsPlugged' ], #traits : 'TBlAnnounceable', #classTraits : 'TBlAnnounceable classTrait', - #category : 'Bloc-Basic-Support', - #package : 'Bloc', - #tag : 'Basic-Support' + #category : 'Bloc-Basic-Support' } -{ #category : 'event management' } +{ #category : #'event management' } TBlAnnouncerProvider >> announce: anAnnouncement [ self announcerIsPlugged ifFalse: [ ^ self ]. self announcerDo: [ :ann | ann announce: anAnnouncement ] ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnouncerProvider >> announcerIsPlugged [ ^ privateAnnouncerIsPlugged ifNil: [ privateAnnouncerIsPlugged := true ] ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnouncerProvider >> ensureAnnouncer [ privateAnnouncer ifNil: [ privateAnnouncer := Announcer new ] ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnouncerProvider >> privateAnnouncer [ ^ privateAnnouncer ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnouncerProvider >> resetAnnouncer [ privateAnnouncer := nil ] -{ #category : 'private - accessing' } +{ #category : #'private - accessing' } TBlAnnouncerProvider >> unplugAnnouncerWhile: aBlock [ privateAnnouncerIsPlugged := false. diff --git a/src/Bloc/TBlAssertUIProcess.trait.st b/src/Bloc/TBlAssertUIProcess.trait.st index d3332a00a..b385e2bf2 100644 --- a/src/Bloc/TBlAssertUIProcess.trait.st +++ b/src/Bloc/TBlAssertUIProcess.trait.st @@ -4,13 +4,11 @@ I should be used by ${class:BlElement}$. " Trait { - #name : 'TBlAssertUIProcess', - #category : 'Bloc-Utilities - Debugging', - #package : 'Bloc', - #tag : 'Utilities - Debugging' + #name : #TBlAssertUIProcess, + #category : 'Bloc-Utilities - Debugging' } -{ #category : 'asserting' } +{ #category : #asserting } TBlAssertUIProcess >> assertUIProcess [ "Make sure that I am executing in a UI process" | aCurrentProcess aUIProcess | diff --git a/src/Bloc/TBlDebug.trait.st b/src/Bloc/TBlDebug.trait.st index 487f6f8ea..6f255a819 100644 --- a/src/Bloc/TBlDebug.trait.st +++ b/src/Bloc/TBlDebug.trait.st @@ -7,13 +7,11 @@ I contain useful debug utility methods that can be enabled / disabled with: ]]] " Trait { - #name : 'TBlDebug', - #category : 'Bloc-Utilities - Debugging', - #package : 'Bloc', - #tag : 'Utilities - Debugging' + #name : #TBlDebug, + #category : 'Bloc-Utilities - Debugging' } -{ #category : 'debug - asserting' } +{ #category : #'debug - asserting' } TBlDebug classSide >> assert: aBlock [ "Throw an assertion error if aBlock does not evaluates to true. We check for true explicitly to make the assertion fail for non booleans. @@ -24,7 +22,7 @@ TBlDebug classSide >> assert: aBlock [ ifTrue: [ aBlock value == true ifFalse: [ AssertionFailure signal: 'Assertion failed' ] ] ] -{ #category : 'debug - asserting' } +{ #category : #'debug - asserting' } TBlDebug classSide >> assert: aBlock description: aStringOrBlock [ "Throw an assertion error if aBlock does not evaluates to true. @@ -34,21 +32,21 @@ TBlDebug classSide >> assert: aBlock description: aStringOrBlock [ ifTrue: [ aBlock value == true ifFalse: [ AssertionFailure signal: aStringOrBlock value ] ] ] -{ #category : 'debug - asserting' } +{ #category : #'debug - asserting' } TBlDebug classSide >> assertionsEnabled [ ^ Bloc assertionsEnabled ] -{ #category : 'debug - asserting' } +{ #category : #'debug - asserting' } TBlDebug >> assert: aBlock [ "Throw an assertion error if aBlock does not evaluates to true" self class assert: aBlock ] -{ #category : 'debug - asserting' } +{ #category : #'debug - asserting' } TBlDebug >> assert: aBlock description: aStringOrBlock [ "Throw an assertion error if aBlock does not evaluates to true." diff --git a/src/Bloc/TBlElementCommonStyles.trait.st b/src/Bloc/TBlElementCommonStyles.trait.st index 0ee11a6c9..90d35b1c4 100644 --- a/src/Bloc/TBlElementCommonStyles.trait.st +++ b/src/Bloc/TBlElementCommonStyles.trait.st @@ -1,96 +1,94 @@ Trait { - #name : 'TBlElementCommonStyles', - #category : 'Bloc-Basic-Style', - #package : 'Bloc', - #tag : 'Basic-Style' + #name : #TBlElementCommonStyles, + #category : 'Bloc-Basic-Style' } -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> default [ ^ self styleFor: BlElementState default ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> default: aBlock [ aBlock value: self default ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> deselected [ ^ self styleFor: BlElementState deselected ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> deselected: aBlock [ aBlock value: self deselected ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> disabled [ ^ self styleFor: BlElementState disabled ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> disabled: aBlock [ aBlock value: self disabled ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> enabled [ ^ self styleFor: BlElementState enabled ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> enabled: aBlock [ aBlock value: self enabled ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> focused [ ^ self styleFor: BlElementState focused ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> focused: aBlock [ aBlock value: self focused ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> hovered [ ^ self styleFor: BlElementState hovered ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> hovered: aBlock [ aBlock value: self hovered ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> pressed [ ^ self styleFor: BlElementState pressed ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> pressed: aBlock [ aBlock value: self pressed ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> selected [ ^ self styleFor: BlElementState selected ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> selected: aBlock [ aBlock value: self selected ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> unfocused [ ^ self styleFor: BlElementState unfocused ] -{ #category : 'api - styles' } +{ #category : #'api - styles' } TBlElementCommonStyles >> unfocused: aBlock [ aBlock value: self unfocused ] diff --git a/src/Bloc/TBlElementProperties.trait.st b/src/Bloc/TBlElementProperties.trait.st index bd0529520..0561d970f 100644 --- a/src/Bloc/TBlElementProperties.trait.st +++ b/src/Bloc/TBlElementProperties.trait.st @@ -1,148 +1,146 @@ Trait { - #name : 'TBlElementProperties', - #category : 'Bloc-Basic-Properties', - #package : 'Bloc', - #tag : 'Basic-Properties' + #name : #TBlElementProperties, + #category : 'Bloc-Basic-Properties' } -{ #category : 'adding' } +{ #category : #adding } TBlElementProperties >> addProperty: aBlElementProperty [ self explicitRequirement ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> background: aPaint [ self addProperty: (BlElementBackgroundProperty new background: aPaint) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> border: aBlBorder [ self addProperty: (BlElementBorderProperty new border: aBlBorder) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> do: anApplyBlock [ self do: anApplyBlock after: [ ] ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> do: anApplyBlock after: aCleanBlock [ self addProperty: (BlElementDynamicProperty new applyAction: anApplyBlock; cleanAction: aCleanBlock) ] -{ #category : 'api - properties constraints' } +{ #category : #'api - properties constraints' } TBlElementProperties >> effect: aBlEffect [ self addProperty: (BlElementEffectProperty new effect: aBlEffect) ] -{ #category : 'api - properties font' } +{ #category : #'api - properties font' } TBlElementProperties >> fontSize: aBlElementPropertyLength [ self addProperty: (BlElementFontSizeProperty new fontSize: aBlElementPropertyLength) ] -{ #category : 'api - properties font' } +{ #category : #'api - properties font' } TBlElementProperties >> fontSizeEm: aNumber [ self fontSize: (BlValueWithUnit em: aNumber) ] -{ #category : 'api - properties font' } +{ #category : #'api - properties font' } TBlElementProperties >> fontSizePt: aNumber [ self fontSize: (BlValueWithUnit pt: aNumber) ] -{ #category : 'api - properties font' } +{ #category : #'api - properties font' } TBlElementProperties >> fontSizeRem: aNumber [ self fontSize: (BlValueWithUnit rem: aNumber) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> foreground: aPaint [ self addProperty: (BlElementForegroundProperty new foreground: aPaint) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> geometry: aBlElementGeometry [ self addProperty: (BlElementGeometryProperty new geometry: aBlElementGeometry) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> gone [ self visibility: BlVisibility gone ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> hExact: aWidth [ self addProperty: (BlElementLayoutHorizontalResizerProperty new exact: aWidth) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> hFitContent [ self addProperty: (BlElementLayoutHorizontalResizerProperty new fitContent) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> hFitContentLimited [ self addProperty: (BlElementLayoutHorizontalResizerProperty new fitContentLimited) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> hMatchParent [ self addProperty: (BlElementLayoutHorizontalResizerProperty new matchParent) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> hidden [ self visibility: BlVisibility hidden ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> layout: aBlLayout [ self addProperty: (BlElementLayoutProperty new layout: aBlLayout) ] -{ #category : 'api - properties constraints' } +{ #category : #'api - properties constraints' } TBlElementProperties >> margin: aBlInsets [ self addProperty: (BlElementMarginProperty new margin: aBlInsets) ] -{ #category : 'api - properties constraints' } +{ #category : #'api - properties constraints' } TBlElementProperties >> padding: aBlInsets [ self addProperty: (BlElementPaddingProperty new padding: aBlInsets) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> scaleBy: aNumber [ self addProperty: (BlElementTransformationScaleProperty new scaleFactor: aNumber) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> vExact: aHeight [ self addProperty: (BlElementLayoutVerticalResizerProperty new exact: aHeight) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> vFitContent [ self addProperty: (BlElementLayoutVerticalResizerProperty new fitContent) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> vFitContentLimited [ self addProperty: (BlElementLayoutVerticalResizerProperty new fitContentLimited) ] -{ #category : 'api - properties layout' } +{ #category : #'api - properties layout' } TBlElementProperties >> vMatchParent [ self addProperty: (BlElementLayoutVerticalResizerProperty new matchParent) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> visibility: aBlVisibility [ self addProperty: (BlElementVisibilityProperty new visibility: aBlVisibility) ] -{ #category : 'api - properties' } +{ #category : #'api - properties' } TBlElementProperties >> visible [ self visibility: BlVisibility visible ] diff --git a/src/Bloc/TBlElementStyles.trait.st b/src/Bloc/TBlElementStyles.trait.st index 1adc4fd1c..2d7ad52ce 100644 --- a/src/Bloc/TBlElementStyles.trait.st +++ b/src/Bloc/TBlElementStyles.trait.st @@ -1,17 +1,15 @@ Trait { - #name : 'TBlElementStyles', - #category : 'Bloc-Basic-Style', - #package : 'Bloc', - #tag : 'Basic-Style' + #name : #TBlElementStyles, + #category : 'Bloc-Basic-Style' } -{ #category : 'private - adding' } +{ #category : #'private - adding' } TBlElementStyles >> basicAddStyle: aStyle [ self explicitRequirement ] -{ #category : 'private - adding' } +{ #category : #'private - adding' } TBlElementStyles >> newStyleForState: aBlElementState [ ^ BlElementStyle new @@ -19,7 +17,7 @@ TBlElementStyles >> newStyleForState: aBlElementState [ yourself ] -{ #category : 'private - adding' } +{ #category : #'private - adding' } TBlElementStyles >> styleFor: aBlElementState [ ^ self @@ -32,7 +30,7 @@ TBlElementStyles >> styleFor: aBlElementState [ aNewStyle ] ] -{ #category : 'private - adding' } +{ #category : #'private - adding' } TBlElementStyles >> styleForState: aState ifFound: aFoundBlock ifNone: aNoneBlock [ self explicitRequirement diff --git a/src/Bloc/TBlEventTarget.trait.st b/src/Bloc/TBlEventTarget.trait.st index 8cd8943c7..a2c2b2fc2 100644 --- a/src/Bloc/TBlEventTarget.trait.st +++ b/src/Bloc/TBlEventTarget.trait.st @@ -3,28 +3,26 @@ I implement a basic infrastructure of event management. Any object that needs to be able to handle events should use me. " Trait { - #name : 'TBlEventTarget', - #category : 'Bloc-Events-Dispatcher', - #package : 'Bloc', - #tag : 'Events-Dispatcher' + #name : #TBlEventTarget, + #category : 'Bloc-Events-Dispatcher' } -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> addEventFilter: anEventHandler [ self eventDispatcher addEventFilter: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> addEventFilterOn: anEventClass do: aBlock [ self addEventFilter: (BlEventHandler on: anEventClass do: aBlock) ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> addEventHandler: anEventHandler [ self eventDispatcher addEventHandler: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> addEventHandlerIfNotPresent: anEventHandler [ (self hasEventHandler: anEventHandler) ifTrue: [ ^ self ]. @@ -32,17 +30,17 @@ TBlEventTarget >> addEventHandlerIfNotPresent: anEventHandler [ self addEventHandler: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> addEventHandlerOn: anEventClass do: aBlock [ self addEventHandler: (BlEventHandler on: anEventClass do: aBlock) ] -{ #category : 'shortcut management' } +{ #category : #'shortcut management' } TBlEventTarget >> addShortcut: aShortcut [ self eventDispatcher addShortcut: aShortcut ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> buildEventDispatchChain: aBlEventDispatcherChain [ "Note: Dispatcher chain is persistent - I return a new instance" @@ -57,7 +55,7 @@ TBlEventTarget >> buildEventDispatchChain: aBlEventDispatcherChain [ ^ aResultChain ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> buildEventDispatchChain: aBlEventDispatcherChain upTo: anOtherEventTarget [ "Build an event dispatch chain up to but excluding a given other event target Note: Dispatcher chain is persistent - I return a new instance" @@ -73,7 +71,7 @@ TBlEventTarget >> buildEventDispatchChain: aBlEventDispatcherChain upTo: anOther ^ aResultChain ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> dispatchEvent: anEvent [ "I only call my event dispatcher, so the event can be only handled by my event handlers/filters" @@ -87,7 +85,7 @@ TBlEventTarget >> dispatchEvent: anEvent [ ifTrue: [ self eventDispatcher dispatchEvent: anEvent ] ] -{ #category : 'event management accessing' } +{ #category : #'event management accessing' } TBlEventTarget >> eventDispatcher [ "Return an object responsible for event dispatching" @@ -95,7 +93,7 @@ TBlEventTarget >> eventDispatcher [ ^ self explicitRequirement ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> fireEvent: anEvent [ "I fire provided event building an event dispatcher chain (from target to the root element) and dispatch the event with it." @@ -111,17 +109,17 @@ TBlEventTarget >> fireEvent: anEvent [ aDispatcherChain dispatchEvent: anEvent ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> hasEventFilter: anEventHandler [ ^ self eventDispatcher hasFilter: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> hasEventHandler: anEventHandler [ ^ self eventDispatcher hasHandler: anEventHandler ] -{ #category : 'event management accessing' } +{ #category : #'event management accessing' } TBlEventTarget >> hasNextEventTarget [ "Return true if this event target has a logical successor within a dispatch chain. For example, in case of visual components next event target is a parent, meaning @@ -132,7 +130,7 @@ TBlEventTarget >> hasNextEventTarget [ ^ false ] -{ #category : 'event management accessing' } +{ #category : #'event management accessing' } TBlEventTarget >> nextEventTarget [ "Return next event target that should be contained in dispatch chain. Note: returned object must use TBlEventTarget trait!" @@ -141,49 +139,49 @@ TBlEventTarget >> nextEventTarget [ self error: 'Override me if there is a next event target.' ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> removeEventFilter: anEventHandler [ self eventDispatcher removeEventFilter: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> removeEventFiltersSuchThat: aBlock [ self eventDispatcher removeEventFiltersSuchThat: aBlock ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> removeEventHandler: anEventHandler [ self eventDispatcher removeEventHandler: anEventHandler ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> removeEventHandlersSuchThat: aBlock [ self eventDispatcher removeEventHandlersSuchThat: aBlock ] -{ #category : 'shortcut management' } +{ #category : #'shortcut management' } TBlEventTarget >> removeShortcut: aShortcut [ self eventDispatcher removeShortcut: aShortcut ] -{ #category : 'shortcut management' } +{ #category : #'shortcut management' } TBlEventTarget >> removeShortcutsWithCombination: aBlKeyCombination [ self eventDispatcher removeAllShortcutsWithCombination: aBlKeyCombination ] -{ #category : 'shortcut management' } +{ #category : #'shortcut management' } TBlEventTarget >> shortcuts [ ^ self eventDispatcher shortcutHandler shortcuts ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> when: anEventClass do: aBlock [ self addEventHandlerOn: anEventClass do: aBlock ] -{ #category : 'event management' } +{ #category : #'event management' } TBlEventTarget >> when: anEventClass doOnce: aBlock [ | anEventHandler | diff --git a/src/Bloc/TBlHostSpace.trait.st b/src/Bloc/TBlHostSpace.trait.st index 8c09dbbd5..4e0499611 100644 --- a/src/Bloc/TBlHostSpace.trait.st +++ b/src/Bloc/TBlHostSpace.trait.st @@ -6,71 +6,69 @@ An Host Space is an actual screen area provided by the underlying Host. This area is typically an host-specific window. " Trait { - #name : 'TBlHostSpace', + #name : #TBlHostSpace, #instVars : [ 'host', 'space', 'universe', 'renderer' ], - #category : 'Bloc-Universe - Host', - #package : 'Bloc', - #tag : 'Universe - Host' + #category : 'Bloc-Universe - Host' } -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> close [ self explicitRequirement ] -{ #category : 'initialization' } +{ #category : #initialization } TBlHostSpace >> createBufferSurfaceRenderer [ "Answer a new `BlHostSurfaceRenderer`." ^ self explicitRequirement ] -{ #category : 'initialization' } +{ #category : #initialization } TBlHostSpace >> createFormSurfaceRenderer [ "Answer a new `BlHostSurfaceRenderer`." ^ self explicitRequirement ] -{ #category : 'host space - cursor' } +{ #category : #'host space - cursor' } TBlHostSpace >> cursor: aCursor [ "Change current cursor image/view to the given one." self explicitRequirement ] -{ #category : 'host space - geometry' } +{ #category : #'host space - geometry' } TBlHostSpace >> densityDpi [ "Return the screen density expressed as the number of dots-per-inch." ^ self explicitRequirement ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> detachHost [ host := nil ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> detachSpace [ space := nil ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> detachUniverse [ universe := nil ] -{ #category : 'host space - events' } +{ #category : #'host space - events' } TBlHostSpace >> enqueueEvent: aBlEvent [ "I dispatch events directly to the universe or space as soon as they come" @@ -83,17 +81,17 @@ TBlHostSpace >> enqueueEvent: aBlEvent [ self space dispatchEvent: aBlEvent ] -{ #category : 'host space - events' } +{ #category : #'host space - events' } TBlHostSpace >> fetchedEventsDo: aBlock [ "Flush event queue and evaluate a given block with every queued event as argument" ] -{ #category : 'host space - events' } +{ #category : #'host space - events' } TBlHostSpace >> generateEvents [ "Generate more complex state change events such as window scale event when resolution of the screen changes" ] -{ #category : 'host space - testing' } +{ #category : #'host space - testing' } TBlHostSpace >> hasResized [ "Return true if renderer extent changed. It may happen if window moved between displays with different DPI, @@ -102,27 +100,27 @@ TBlHostSpace >> hasResized [ ^ self renderer hasResized: self ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> host [ "Return a host that was used to create this host space" ^ host ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> host: aBlHost [ "Assign a host that was used to create this host space" host := aBlHost ] -{ #category : 'initialization' } +{ #category : #initialization } TBlHostSpace >> initializeRenderer [ renderer initializeForHostSpace: self ] -{ #category : 'host space - testing' } +{ #category : #'host space - testing' } TBlHostSpace >> isVisible [ "Return true if underlying window is shown, false otherwise. Note: If window was shown and then minimized it is still considered to be visible. @@ -131,7 +129,7 @@ TBlHostSpace >> isVisible [ ^ self explicitRequirement ] -{ #category : 'host space - geometry' } +{ #category : #'host space - geometry' } TBlHostSpace >> logicalSize [ "Returns the logical size of the host's client area (instance of `BlLogicalDisplaySize`). The client area is the content of the window, excluding the title bar and borders. @@ -140,43 +138,43 @@ TBlHostSpace >> logicalSize [ ^ self explicitRequirement ] -{ #category : 'host space - rendering' } +{ #category : #'host space - rendering' } TBlHostSpace >> makeCurrent [ "When displaying visual content on the screen very often a window framebuffer must be marked as a current." ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> maximize [ self explicitRequirement ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> maximized [ ^ self explicitRequirement ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> minimize [ self explicitRequirement ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> minimized [ ^ self explicitRequirement ] -{ #category : 'host space - testing' } +{ #category : #'host space - testing' } TBlHostSpace >> needsRebuild [ "Return true if window should be recreated after user saved and quit Pharo." ^ self explicitRequirement ] -{ #category : 'host space - geometry' } +{ #category : #'host space - geometry' } TBlHostSpace >> physicalSize [ "Return a physical host size which is what the framebuffer size should be (Instance of `BlPhysicalDisplaySize`). This size may differ from the logical size on high DPI (Retina) screens. @@ -185,32 +183,32 @@ TBlHostSpace >> physicalSize [ ^ self explicitRequirement ] -{ #category : 'host space - rendering' } +{ #category : #'host space - rendering' } TBlHostSpace >> render: aSpace [ "Render a given abstract space on an underlying window or visual area" self renderer render: self ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> renderer [ "Return the host renderer used to render the elements of my spaces." ^ renderer ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> renderer: aBlHostRenderer [ renderer := aBlHostRenderer ] -{ #category : 'host space - rendering' } +{ #category : #'host space - rendering' } TBlHostSpace >> requestRedraw [ "Space needs to redraw the window" ] -{ #category : 'host space - geometry' } +{ #category : #'host space - geometry' } TBlHostSpace >> scaleFactor [ "Return a scaling dpi factor from logical to physical coordinates. On high DPI displays, scaling factor is > 1." @@ -234,65 +232,65 @@ TBlHostSpace >> scaleFactor [ ^ aWidthScale ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> show [ self explicitRequirement ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> space [ "Return a space I am assigned to." ^ space ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> space: aSpace [ "Assign me to a given space." space := aSpace ] -{ #category : 'host space - testing' } +{ #category : #'host space - testing' } TBlHostSpace >> supportsBufferSurface [ "Return true if this host space can work with a buffer surface, false otherwise." ^ self host supportsBufferSurface ] -{ #category : 'host space - testing' } +{ #category : #'host space - testing' } TBlHostSpace >> supportsFormSurface [ "Return true if this host space can work with form surface, false otherwise." ^ self host supportsFormSurface ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> toBack [ self explicitRequirement ] -{ #category : 'host space - displaying' } +{ #category : #'host space - displaying' } TBlHostSpace >> toFront [ self explicitRequirement ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> universe [ ^ universe ] -{ #category : 'host space - accessing' } +{ #category : #'host space - accessing' } TBlHostSpace >> universe: aBlParallelUniverse [ universe := aBlParallelUniverse ] -{ #category : 'host space - geometry' } +{ #category : #'host space - geometry' } TBlHostSpace >> windowExtent: anExtent [ self explicitRequirement diff --git a/src/Bloc/TBlLayoutChildNode.trait.st b/src/Bloc/TBlLayoutChildNode.trait.st index e1433ec24..83cf6e83a 100644 --- a/src/Bloc/TBlLayoutChildNode.trait.st +++ b/src/Bloc/TBlLayoutChildNode.trait.st @@ -1,16 +1,14 @@ Trait { - #name : 'TBlLayoutChildNode', - #category : 'Bloc-Layouts-Model', - #package : 'Bloc', - #tag : 'Layouts-Model' + #name : #TBlLayoutChildNode, + #category : 'Bloc-Layouts-Model' } -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> bottom [ ^ self position y + self height ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> bounds [ @@ -19,7 +17,7 @@ TBlLayoutChildNode >> bounds [ extent: self extent ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> extent [ "Return the size of the node in the parent coordinate system" @@ -27,55 +25,55 @@ TBlLayoutChildNode >> extent [ ^ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> height [ ^ self extent y ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> layoutBounds [ ^ self explicitRequirement ] -{ #category : 'api - measure' } +{ #category : #'api - measure' } TBlLayoutChildNode >> measure: anExtentSpec [ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutChildNode >> measurement: aBlLayoutNodeMeasurement [ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutChildNode >> parent [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutChildNode >> parent: aBlLayoutParentNode [ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> perimeter [ ^ (self width + self height) * 2 ] -{ #category : 'api - actions' } +{ #category : #'api - actions' } TBlLayoutChildNode >> popAction [ ^ self explicitRequirement ] -{ #category : 'api - actions' } +{ #category : #'api - actions' } TBlLayoutChildNode >> popActions [ @@ -84,7 +82,7 @@ TBlLayoutChildNode >> popActions [ [ (eachAction := self popAction) notNil ] whileTrue: [ aStream nextPut: eachAction ] ] ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> position [ "Return a position of the top left corner in the parent coordinate system" @@ -92,7 +90,7 @@ TBlLayoutChildNode >> position [ ^ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> position: aPoint [ "Set position of the top left corner in the parent coordinate system" @@ -100,31 +98,31 @@ TBlLayoutChildNode >> position: aPoint [ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutChildNode >> privateMeasurement [ ^ self explicitRequirement ] -{ #category : 'api - actions' } +{ #category : #'api - actions' } TBlLayoutChildNode >> pushAction: aBlLayoutNodeElementAction [ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> right [ ^ self position x + self width ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutChildNode >> userData [ ^ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutChildNode >> width [ diff --git a/src/Bloc/TBlLayoutNode.trait.st b/src/Bloc/TBlLayoutNode.trait.st index 30e6773d7..341e45230 100644 --- a/src/Bloc/TBlLayoutNode.trait.st +++ b/src/Bloc/TBlLayoutNode.trait.st @@ -1,120 +1,118 @@ Trait { - #name : 'TBlLayoutNode', - #category : 'Bloc-Layouts-Model', - #package : 'Bloc', - #tag : 'Layouts-Model' + #name : #TBlLayoutNode, + #category : 'Bloc-Layouts-Model' } -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> constraints [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> constraints: aBlLayoutConstraints [ self explicitRequirement ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> fitContent [ self hFitContent; vFitContent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> hExact: aNumber [ self constraints horizontal exact: aNumber ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> hFitContent [ self constraints horizontal fitContent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> hMatchParent [ self constraints horizontal matchParent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> horizontalResizer [ ^ self constraints horizontal resizer ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> isHorizontalMatchParent [ ^ self horizontalResizer isMatchParent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> isVerticalMatchParent [ ^ self verticalResizer isMatchParent ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> margin [ ^ self constraints margin ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> matchParent [ self hMatchParent; vMatchParent ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> maxExtent [ ^ self maxWidth @ self maxHeight ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> maxHeight [ ^ self constraints maxHeight ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> maxWidth [ ^ self constraints maxWidth ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> minExtent [ ^ self minWidth @ self minHeight ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> minHeight [ ^ self constraints minHeight ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> minWidth [ ^ self constraints minWidth ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutNode >> padding [ ^ self constraints padding ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> vExact: aNumber [ self constraints vertical exact: aNumber ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> vFitContent [ self constraints vertical fitContent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> vMatchParent [ self constraints vertical matchParent ] -{ #category : 'api - resizer' } +{ #category : #'api - resizer' } TBlLayoutNode >> verticalResizer [ ^ self constraints vertical resizer ] diff --git a/src/Bloc/TBlLayoutParentNode.trait.st b/src/Bloc/TBlLayoutParentNode.trait.st index c7d1d4d5d..5bd60f6be 100644 --- a/src/Bloc/TBlLayoutParentNode.trait.st +++ b/src/Bloc/TBlLayoutParentNode.trait.st @@ -1,60 +1,58 @@ Trait { - #name : 'TBlLayoutParentNode', - #category : 'Bloc-Layouts-Model', - #package : 'Bloc', - #tag : 'Layouts-Model' + #name : #TBlLayoutParentNode, + #category : 'Bloc-Layouts-Model' } -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutParentNode >> children [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutParentNode >> children: aBlLayoutNodeChildren [ self explicitRequirement ] -{ #category : 'api - enumerating' } +{ #category : #'api - enumerating' } TBlLayoutParentNode >> childrenDo: aBlock [ self children do: aBlock ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> extent [ ^ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> extent: aPoint [ self explicitRequirement ] -{ #category : 'api - extent spec' } +{ #category : #'api - extent spec' } TBlLayoutParentNode >> extentSpec [ ^ self explicitRequirement ] -{ #category : 'api - extent spec' } +{ #category : #'api - extent spec' } TBlLayoutParentNode >> extentSpec: aBlExtentMeasurementSpec [ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> height [ ^ self extent y ] -{ #category : 'api - extent spec' } +{ #category : #'api - extent spec' } TBlLayoutParentNode >> heightSpec [ ^ self extentSpec heightSpec ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> layoutExtent [ self deprecated: 'Use #extent instead.' @@ -63,7 +61,7 @@ TBlLayoutParentNode >> layoutExtent [ ^ self extent ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> measuredExtent [ @@ -74,7 +72,7 @@ TBlLayoutParentNode >> measuredExtent [ ^ self extent ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> measuredExtent: aPoint [ self deprecated: 'Please use extent: instead.' @@ -85,27 +83,27 @@ TBlLayoutParentNode >> measuredExtent: aPoint [ self extent: aPoint ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutParentNode >> parent [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutParentNode >> position [ ^ self explicitRequirement ] -{ #category : 'accessing' } +{ #category : #accessing } TBlLayoutParentNode >> position: aPoint [ ^ self explicitRequirement ] -{ #category : 'api - geometry' } +{ #category : #'api - geometry' } TBlLayoutParentNode >> width [ ^ self extent x ] -{ #category : 'api - extent spec' } +{ #category : #'api - extent spec' } TBlLayoutParentNode >> widthSpec [ ^ self extentSpec widthSpec ] diff --git a/src/Bloc/TBlSpaceProperties.trait.st b/src/Bloc/TBlSpaceProperties.trait.st index 628d5567f..f5da83868 100644 --- a/src/Bloc/TBlSpaceProperties.trait.st +++ b/src/Bloc/TBlSpaceProperties.trait.st @@ -5,13 +5,11 @@ I must be implemented by all host spaces for window specific implementation. By using this Trait in both Space and HostSpace we make sure that they have the same uniform API " Trait { - #name : 'TBlSpaceProperties', - #category : 'Bloc-Space', - #package : 'Bloc', - #tag : 'Space' + #name : #TBlSpaceProperties, + #category : 'Bloc-Space' } -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> borderless [ "Return true if underlying window is now borderless, false otherwise" @@ -19,14 +17,14 @@ TBlSpaceProperties >> borderless [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> borderless: aBoolean [ "Make host window borderless if true is given" self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> fullscreen [ "Return true if an underlying window is in fullscreen mode, false otherwise" @@ -35,7 +33,7 @@ TBlSpaceProperties >> fullscreen [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> fullscreen: aBoolean [ "Switch underlying window to fullscreen if true is given and exit fullscreen mode if false is given" @@ -43,7 +41,7 @@ TBlSpaceProperties >> fullscreen: aBoolean [ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> fullsize [ "Return true if an underlying window is in fullsize mode, false otherwise. @@ -54,7 +52,7 @@ TBlSpaceProperties >> fullsize [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> fullsize: aBoolean [ "Switch underlying window to fullsize if true is given and exit fullsize mode if false is given. @@ -63,14 +61,14 @@ TBlSpaceProperties >> fullsize: aBoolean [ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> icon: aForm [ "Change window's icon to the given one" self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> position [ "Return window's position in screen coordinates" @@ -78,7 +76,7 @@ TBlSpaceProperties >> position [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> position: aPoint [ "Change window's position to a given point in screen coordinates" @@ -86,7 +84,7 @@ TBlSpaceProperties >> position: aPoint [ ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> resizable [ "Return true if underlying window is resizable, false otherwise" @@ -94,14 +92,14 @@ TBlSpaceProperties >> resizable [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> resizable: aBoolean [ "Make underlying window resizable if true is given" self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> title [ "Return window's title as a string" @@ -109,7 +107,7 @@ TBlSpaceProperties >> title [ ^ self explicitRequirement ] -{ #category : 'window - properties' } +{ #category : #'window - properties' } TBlSpaceProperties >> title: aString [ "Change window's title" diff --git a/src/Bloc/TBlTelemetry.trait.st b/src/Bloc/TBlTelemetry.trait.st index 7b31a95f9..f1f02ffea 100644 --- a/src/Bloc/TBlTelemetry.trait.st +++ b/src/Bloc/TBlTelemetry.trait.st @@ -1,11 +1,9 @@ Trait { - #name : 'TBlTelemetry', - #category : 'Bloc-Space - Telemetry', - #package : 'Bloc', - #tag : 'Space - Telemetry' + #name : #TBlTelemetry, + #category : 'Bloc-Space - Telemetry' } -{ #category : 'instance creation' } +{ #category : #'instance creation' } TBlTelemetry >> emit [ self tasks ifNotEmpty: [ :theTasks | (BlTelemetrySignal new @@ -14,24 +12,24 @@ TBlTelemetry >> emit [ self reset ] -{ #category : 'tasks' } +{ #category : #tasks } TBlTelemetry >> finishSync [ ] -{ #category : 'tasks' } +{ #category : #tasks } TBlTelemetry >> reset [ ] -{ #category : 'tasks' } +{ #category : #tasks } TBlTelemetry >> startSync: aNameBlock [ ] -{ #category : 'tasks' } +{ #category : #tasks } TBlTelemetry >> tasks [ ^ BlTelemetryTasks new ] -{ #category : 'tasks' } +{ #category : #tasks } TBlTelemetry >> timeSync: aNameBlock during: aBlock [ self startSync: aNameBlock. ^ aBlock ensure: [ self finishSync ] diff --git a/src/Bloc/TBlTransformable.trait.st b/src/Bloc/TBlTransformable.trait.st index 80f3209c1..2ff09c361 100644 --- a/src/Bloc/TBlTransformable.trait.st +++ b/src/Bloc/TBlTransformable.trait.st @@ -2,19 +2,17 @@ I define an interface that transformable objects should implement in order to support affine transformations " Trait { - #name : 'TBlTransformable', - #category : 'Bloc-Basic-Transformations', - #package : 'Bloc', - #tag : 'Basic-Transformations' + #name : #TBlTransformable, + #category : 'Bloc-Basic-Transformations' } -{ #category : 'transformations' } +{ #category : #transformations } TBlTransformable >> transform [ ^ BlTransformationBuilder on: self ] -{ #category : 'transformations' } +{ #category : #transformations } TBlTransformable >> transformDo: aBlock [ | aTransformationBuilder | @@ -23,7 +21,7 @@ TBlTransformable >> transformDo: aBlock [ aTransformationBuilder apply ] -{ #category : 'transformations' } +{ #category : #transformations } TBlTransformable >> transformation [ "Return a `BlElementTransformation` that represents a description of my transformation. It can either be a local transformation being a composition of affine transformations or @@ -32,7 +30,7 @@ TBlTransformable >> transformation [ ^ self explicitRequirement ] -{ #category : 'transformations' } +{ #category : #transformations } TBlTransformable >> transformation: aBlElementTransformation [ self explicitRequirement diff --git a/src/Bloc/UndefinedObject.extension.st b/src/Bloc/UndefinedObject.extension.st index ce779aa52..905bf45f2 100644 --- a/src/Bloc/UndefinedObject.extension.st +++ b/src/Bloc/UndefinedObject.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'UndefinedObject' } +Extension { #name : #UndefinedObject } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } UndefinedObject >> asBlocElementId [ ^ BlElementId noId ] diff --git a/src/Bloc/Unicode.extension.st b/src/Bloc/Unicode.extension.st index 00ad418c4..ef65f80d6 100644 --- a/src/Bloc/Unicode.extension.st +++ b/src/Bloc/Unicode.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'Unicode' } +Extension { #name : #Unicode } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } Unicode class >> isPrintable: aCharacter [ | value codeCat | diff --git a/src/Bloc/UnixPlatform.extension.st b/src/Bloc/UnixPlatform.extension.st index def52ee62..cd69d9f17 100644 --- a/src/Bloc/UnixPlatform.extension.st +++ b/src/Bloc/UnixPlatform.extension.st @@ -1,6 +1,6 @@ -Extension { #name : 'UnixPlatform' } +Extension { #name : #UnixPlatform } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } UnixPlatform >> primaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey controlLeft; @@ -8,7 +8,7 @@ UnixPlatform >> primaryModifier [ yourself ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } UnixPlatform >> secondaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey altLeft; diff --git a/src/Bloc/WinPlatform.extension.st b/src/Bloc/WinPlatform.extension.st index c4be5ea2e..3f9c8323f 100644 --- a/src/Bloc/WinPlatform.extension.st +++ b/src/Bloc/WinPlatform.extension.st @@ -1,12 +1,12 @@ -Extension { #name : 'WinPlatform' } +Extension { #name : #WinPlatform } -{ #category : '*Bloc' } +{ #category : #'*Bloc' } WinPlatform >> defaultScrollingVelocity [ ^ 100 ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } WinPlatform >> primaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey controlLeft; @@ -14,7 +14,7 @@ WinPlatform >> primaryModifier [ yourself ] -{ #category : '*Bloc' } +{ #category : #'*Bloc' } WinPlatform >> secondaryModifier [ ^ BlAlternativeCombination new key: KeyboardKey altLeft; diff --git a/src/Bloc/package.st b/src/Bloc/package.st index fc02f7179..1deef64ec 100644 --- a/src/Bloc/package.st +++ b/src/Bloc/package.st @@ -1 +1 @@ -Package { #name : 'Bloc' } +Package { #name : #Bloc } diff --git a/src/BlocHost-Morphic/BlBlocUIManagerNotificationBasicHandler.class.st b/src/BlocHost-Morphic/BlBlocUIManagerNotificationBasicHandler.class.st index 0d3a469ba..b3c479469 100644 --- a/src/BlocHost-Morphic/BlBlocUIManagerNotificationBasicHandler.class.st +++ b/src/BlocHost-Morphic/BlBlocUIManagerNotificationBasicHandler.class.st @@ -13,11 +13,12 @@ BlBlocUIManagerNotificationBasicHandler class >> priority [ { #category : #'private - displaying' } BlBlocUIManagerNotificationBasicHandler >> elementDoOrSpaceDo: aBlock [ + | context | context := thisContext. [ context notNil ] whileTrue: [ ((context receiver isKindOf: BlElement) - or: [ context receiver isKindOf: BlOSpace ]) + or: [ context receiver isKindOf: BlSpace ]) ifTrue: [ ^ aBlock value: context receiver ]. context := context sender ] ] diff --git a/src/BlocHost-Morphic/BlMorphicHost.class.st b/src/BlocHost-Morphic/BlMorphicHost.class.st index 77abb7c67..06292ac57 100644 --- a/src/BlocHost-Morphic/BlMorphicHost.class.st +++ b/src/BlocHost-Morphic/BlMorphicHost.class.st @@ -35,7 +35,7 @@ BlMorphicHost class >> example [ aHost := BlMorphicHost new. aHost containerMorph: aMorph. - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace host: aHost. aSpace show. @@ -44,12 +44,13 @@ BlMorphicHost class >> example [ layout: BlFlowLayout horizontal. 50 timesRepeat: [ - aSpace addChild: (BlElement new - background: Color random translucent; - addEventHandlerOn: BlMouseEnterEvent - do: [ :evt | evt target - background: Color random ]; - yourself).] + aSpace root addChild: + (BlElement new + background: Color random translucent; + addEventHandlerOn: BlMouseEnterEvent + do: [ :evt | + evt target background: Color random ]; + yourself) ] ] { #category : #testing } diff --git a/src/BlocHost-Morphic/BlMorphicWorldEmbeddingElement.class.st b/src/BlocHost-Morphic/BlMorphicWorldEmbeddingElement.class.st index cf082debe..dfc1eca8f 100644 --- a/src/BlocHost-Morphic/BlMorphicWorldEmbeddingElement.class.st +++ b/src/BlocHost-Morphic/BlMorphicWorldEmbeddingElement.class.st @@ -12,9 +12,9 @@ Class { { #category : #'instance creation' } BlMorphicWorldEmbeddingElement class >> open [ + | aSpace | - - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace title: 'Morph World'. aSpace extent: 1280@800. aSpace root: self new. @@ -23,10 +23,10 @@ BlMorphicWorldEmbeddingElement class >> open [ { #category : #'instance creation' } BlMorphicWorldEmbeddingElement class >> openMain [ - + + | aSpace | - - aSpace := BlOSpace new. + aSpace := BlSpace new. aSpace title: 'Morph World'. aSpace extent: 1280@800. aSpace root: self new beMain.