From d81472284958f98e9f31beffd49b35dc942b1de2 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Sun, 10 Apr 2022 20:03:56 -0500
Subject: [PATCH] Repackaging functionality.

---
 src/Markdeep/LePage.extension.st | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/Markdeep/LePage.extension.st b/src/Markdeep/LePage.extension.st
index b1d29b1..16352fb 100644
--- a/src/Markdeep/LePage.extension.st
+++ b/src/Markdeep/LePage.extension.st
@@ -1,5 +1,12 @@
 Extension { #name : #LePage }
 
+{ #category : #'*Markdeep' }
+LePage >> asMarkdeepFile [
+	| folder |
+	folder := self options at: 'storage' ifAbsent: [ FileLocator temp ].
+	^ self asMarkdeep exportAsFileOn: folder / self markdeepFileName 
+]
+
 { #category : #'*Markdeep' }
 LePage >> markdeepFileName [
 	| sanitized |