Dotted.

ObjectProfile · Nov 3, 2023 · eccdb0d · eccdb0d
1 parent ef44be6
commit eccdb0d
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/src/Roassal3-Shapes/RSAbstractLine.class.st b/src/Roassal3-Shapes/RSAbstractLine.class.st
@@ -167,6 +167,12 @@ RSAbstractLine >> dashed [
 	self dashArray: #(4)
 ]
 
+{ #category : 'style - dashes' }
+RSAbstractLine >> dotted [
+
+	self dashArray: { Float goldenRatio }
+]
+
 { #category : 'accessing' }
 RSAbstractLine >> endPoint [
 	^ self subclassResponsibility

diff --git a/src/Roassal3-Shapes/RSTLine.trait.st b/src/Roassal3-Shapes/RSTLine.trait.st
@@ -76,6 +76,12 @@ RSTLine >> dashed [
 	self shape dashed
 ]
 
+{ #category : 'public - shape' }
+RSTLine >> dotted [
+
+	self dashArray: { Float goldenRatio }
+]
+
 { #category : 'public - shape' }
 RSTLine >> format [
 	^ formatString