diff --git a/source/RenoirSt-Core/CssDeclarationBlock.class.st b/source/RenoirSt-Core/CssDeclarationBlock.class.st index 30cdfe4..a1a5035 100644 --- a/source/RenoirSt-Core/CssDeclarationBlock.class.st +++ b/source/RenoirSt-Core/CssDeclarationBlock.class.st @@ -521,6 +521,12 @@ CssDeclarationBlock >> height: aWidth [ self propertyAt: 'height' put: aWidth ] +{ #category : #'text properties' } +CssDeclarationBlock >> hyphens: aCssValue [ + + self propertyAt: 'hyphens' put: aCssValue +] + { #category : #'initialize-release' } CssDeclarationBlock >> initialize [ diff --git a/source/RenoirSt-Tests/CssDeclarationBlockTest.class.st b/source/RenoirSt-Tests/CssDeclarationBlockTest.class.st index 46bc883..b82bb83 100644 --- a/source/RenoirSt-Tests/CssDeclarationBlockTest.class.st +++ b/source/RenoirSt-Tests/CssDeclarationBlockTest.class.st @@ -267,6 +267,7 @@ CssDeclarationBlockTest >> testPrintStringOfTextDecorationProperties [ CssDeclarationBlockTest >> testPrintStringOfTextProperties [ self + assert: [ :style | style hyphens: #auto ] rendersProperty: 'hyphens' withValue: 'auto'; assert: [ :style | style letterSpacing: #normal ] rendersProperty: 'letter-spacing' withValue: 'normal'; assert: [ :style | style textAlign: #center ] rendersProperty: 'text-align' withValue: 'center'; assert: [ :style | style textDecoration: #underline ] rendersProperty: 'text-decoration' withValue: 'underline';