Implementing repository detection.
This commit is contained in:
parent
fe40b438d0
commit
35788f5ca9
@ -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 [
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user