From 45fa06e715e7e0fd1d332fe5209db4258af2805e Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Thu, 23 Mar 2023 18:08:01 -0500
Subject: [PATCH] Typo and starting storage GUI for notes.

---
 src/MiniDocs/LePage.extension.st | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

diff --git a/src/MiniDocs/LePage.extension.st b/src/MiniDocs/LePage.extension.st
index 559f638..b49764b 100644
--- a/src/MiniDocs/LePage.extension.st
+++ b/src/MiniDocs/LePage.extension.st
@@ -227,6 +227,22 @@ LePage >> storage [
 	^ self optionAt: 'storage'
 ]
 
+{ #category : #'*MiniDocs' }
+LePage >> uiDefineFolderFor: anAction [
+	<lePageAction>
+	| folderButton |
+	folderButton := anAction button
+		tooltip: 'Define folder';
+		icon: BrGlamorousIcons savetodisk;
+		"aptitude: BrGlamorousButtonWithIconAptitude;"
+		action: [ ].
+	"folderButton addAptitude: (BrGlamorousWithDropdownAptitude
+		handle: [ self  ]
+		content: [self ]).
+	folderButton aptitude - BrGlamorousButtonExteriorAptitude."
+	^ folderButton	
+]
+
 { #category : #'*MiniDocs' }
 LePage >> uiExportButtonFor: anAction [
 	<lePageAction>
@@ -237,7 +253,7 @@ LePage >> uiExportButtonFor: anAction [
 ]
 
 { #category : #'*MiniDocs' }
-LePage >> uiRefrepshWebPreviewButtonFor: anAction [
+LePage >> uiRefreshWebPreviewButtonFor: anAction [
 	<lePageAction>
 	^ anAction button
 		tooltip: 'Refresh web view';