From 0d0d93f0246785c670bfd97a901d77996dc33ffc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jan=20Blizni=C4=8Denko?= Date: Wed, 24 Jul 2024 12:18:44 +0200 Subject: [PATCH] fixed a few method protocols --- repository/OpenPonk-Core/OPTBorderColoredAsStroke.trait.st | 2 +- repository/OpenPonk-Core/OPTColored.trait.st | 4 ++-- .../OPTColoredAsFillAndBorderColoredAsStroke.trait.st | 2 +- repository/OpenPonk-Core/OPTColoredAsStroke.trait.st | 2 +- 4 files changed, 5 insertions(+), 5 deletions(-) diff --git a/repository/OpenPonk-Core/OPTBorderColoredAsStroke.trait.st b/repository/OpenPonk-Core/OPTBorderColoredAsStroke.trait.st index ba1a9dae..b1dee070 100644 --- a/repository/OpenPonk-Core/OPTBorderColoredAsStroke.trait.st +++ b/repository/OpenPonk-Core/OPTBorderColoredAsStroke.trait.st @@ -23,7 +23,7 @@ OPTBorderColoredAsStroke >> strokeColor: aColor [ ^ self stylePropertyNamed: #strokeColor put: aColor ] -{ #category : 'update' } +{ #category : 'initialization' } OPTBorderColoredAsStroke >> updateBorderColorFromStyles [ self roassalShape diff --git a/repository/OpenPonk-Core/OPTColored.trait.st b/repository/OpenPonk-Core/OPTColored.trait.st index fc9a07ce..f1f9fc95 100644 --- a/repository/OpenPonk-Core/OPTColored.trait.st +++ b/repository/OpenPonk-Core/OPTColored.trait.st @@ -11,7 +11,7 @@ OPTColored >> color [ ^ self shouldBeImplemented ] -{ #category : 'update' } +{ #category : 'initialization' } OPTColored >> updateColorFromStyles [ self roassalShape @@ -27,7 +27,7 @@ OPTColored >> updateColorFromStyles [ self roassalShape color: self color ] -{ #category : 'update' } +{ #category : 'initialization' } OPTColored >> updateRenderFromStyles [ self isRendered ifFalse: [ ^ self ]. diff --git a/repository/OpenPonk-Core/OPTColoredAsFillAndBorderColoredAsStroke.trait.st b/repository/OpenPonk-Core/OPTColoredAsFillAndBorderColoredAsStroke.trait.st index a105bbd8..25159b8f 100644 --- a/repository/OpenPonk-Core/OPTColoredAsFillAndBorderColoredAsStroke.trait.st +++ b/repository/OpenPonk-Core/OPTColoredAsFillAndBorderColoredAsStroke.trait.st @@ -7,7 +7,7 @@ Trait { #tag : 'Shapes' } -{ #category : 'update' } +{ #category : 'initialization' } OPTColoredAsFillAndBorderColoredAsStroke >> updateRenderFromStyles [ self isRendered ifFalse: [ ^ self ]. diff --git a/repository/OpenPonk-Core/OPTColoredAsStroke.trait.st b/repository/OpenPonk-Core/OPTColoredAsStroke.trait.st index 5c17611c..fd90746c 100644 --- a/repository/OpenPonk-Core/OPTColoredAsStroke.trait.st +++ b/repository/OpenPonk-Core/OPTColoredAsStroke.trait.st @@ -7,7 +7,7 @@ Trait { #tag : 'Shapes' } -{ #category : 'update' } +{ #category : 'accessing' } OPTColoredAsStroke >> color [ ^ self strokeColor