Offray/MiniDocs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Implementing FileLocator aliases, so data narratives can use them instead of fixed locations.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-05-02 16:00:57 -05:00
parent f592e29eef
commit 31e27acdff
60 changed files with 4663 additions and 4634 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
src/MiniDocs/FileLocator.extension.st Normal file
View File

@ -0,0 +1,29 @@
Extension { #name : #FileLocator }
{ #category : #'*MiniDocs' }
FileLocator class >> aliases [
| fileAliases |
fileAliases := self fileAliases.
fileAliases exists
ifFalse: [ | initialConfig |
initialConfig := Dictionary new.
fileAliases ensureCreateFile.
MarkupFile exportAsFileOn: fileAliases containing: initialConfig
].
^ STON fromString: fileAliases contents
]
{ #category : #'*MiniDocs' }
FileLocator class >> atAlias: aString put: aFolderOrFile [
| updatedAliases |
updatedAliases:= self aliases
at: aString put: aFolderOrFile;
yourself.
MarkupFile exportAsFileOn: self fileAliases containing: updatedAliases.
^ updatedAliases
]
{ #category : #'*MiniDocs' }
FileLocator class >> fileAliases [
^ MiniDocs appFolder / 'fileAliases.ston'
]