diff --git a/src/MiniDocs/LePage.extension.st b/src/MiniDocs/LePage.extension.st
index 1b3e5fd..3d0ff92 100644
--- a/src/MiniDocs/LePage.extension.st
+++ b/src/MiniDocs/LePage.extension.st
@@ -61,6 +61,18 @@ LePage >> asMarkdownFile [
 	^ 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' }
 LePage >> markdeepFileName [
 	
@@ -69,9 +81,7 @@ LePage >> markdeepFileName [
 
 { #category : #'*MiniDocs' }
 LePage >> markdownFileName [
-	| sanitized |
-	sanitized := self title asDashedLowercase copyWithoutAll: #($/). 
-	^ sanitized, '--',(self uidString copyFrom: 1 to: 5), '.md'.
+	^ self exportedFileName, '.md'
 ]
 
 { #category : #'*MiniDocs' }