Starting HTML export support.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-07-19 15:40:40 -05:00
parent d2fb9e00da
commit b48ad035da

View File

@ -61,6 +61,18 @@ LePage >> asMarkdownFile [
^ MarkupFile exportAsFileOn: folder / self markdownFileName containing: self asMarkdown contents ^ MarkupFile exportAsFileOn: folder / self markdownFileName containing: self asMarkdown contents
] ]
{ #category : #'*MiniDocs' }
LePage >> exportedFileName [
| sanitized |
sanitized := self title asDashedLowercase copyWithoutAll: #($/).
^ sanitized , '--' , (self uidString copyFrom: 1 to: 5)
]
{ #category : #'*MiniDocs' }
LePage >> htmlFileName [
self exportedFileName, '.html'
]
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }
LePage >> markdeepFileName [ LePage >> markdeepFileName [
@ -69,9 +81,7 @@ LePage >> markdeepFileName [
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }
LePage >> markdownFileName [ LePage >> markdownFileName [
| sanitized | ^ self exportedFileName, '.md'
sanitized := self title asDashedLowercase copyWithoutAll: #($/).
^ sanitized, '--',(self uidString copyFrom: 1 to: 5), '.md'.
] ]
{ #category : #'*MiniDocs' } { #category : #'*MiniDocs' }