Implementing repository detection.

This commit is contained in:
ruidajo 2022-03-03 17:50:56 -05:00
parent fe40b438d0
commit 35788f5ca9

View File

@ -95,6 +95,18 @@ TiddlyWiki >> contentTiddlersWithoutLargeTiddlers [
^ content.
]
{ #category : #accessing }
TiddlyWiki >> detectRepository [
| folder folderItems |
folder := self file parent.
folderItems := folder children.
[(folderItems select: [ :path | path fullName endsWith: '.fossil' ]) isEmpty]
whileTrue: [folder := folder parent.
folderItems := folder children.].
^ folder
]
{ #category : #accessing }
TiddlyWiki >> exportContentShadowAndLargeTiddlersSTONFiles [