From 03dbf9654269def8f9cdcf072f3a7d682ded5e18 Mon Sep 17 00:00:00 2001 From: Alain Plantec Date: Thu, 22 Feb 2024 22:45:49 +0100 Subject: [PATCH] cosmetic --- src/Album/AlbOppositeDelimiterElement.class.st | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/src/Album/AlbOppositeDelimiterElement.class.st b/src/Album/AlbOppositeDelimiterElement.class.st index 35e4d4f..9859096 100644 --- a/src/Album/AlbOppositeDelimiterElement.class.st +++ b/src/Album/AlbOppositeDelimiterElement.class.st @@ -10,7 +10,7 @@ Class { { #category : #accessing } AlbOppositeDelimiterElement >> borderColor [ - ^ Color gray + ^ Color yellow twiceDarker ] { #category : #cleanup } @@ -27,10 +27,17 @@ AlbOppositeDelimiterElement >> defaultBackground [ ^ Color yellow ] +{ #category : #initialization } +AlbOppositeDelimiterElement >> defaultGeometry [ + + ^ BlRoundedRectangleGeometry cornerRadius: 3 +] + { #category : #initialization } AlbOppositeDelimiterElement >> initialize [ super initialize. + self geometry: self defaultGeometry. self opacity: 0. anim := ((BlOpacityAnimation new opacity: 1.6) duration: 300 milliSeconds). self addAnimation: anim