diff --git a/src/MiniDocs/String.extension.st b/src/MiniDocs/String.extension.st new file mode 100644 index 0000000..021c838 --- /dev/null +++ b/src/MiniDocs/String.extension.st @@ -0,0 +1,8 @@ +Extension { #name : #String } + +{ #category : #'*MiniDocs' } +String >> asDashedLowercase [ + "I convert phrases like 'This is a phrase' into 'this-is-a-phrase'." + + ^ '-' join: (self substrings collect: [:each | each asLowercase ]) +]