Fixing repository detection.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-03-04 09:12:52 -05:00
parent 2353ffb15f
commit 528c5adf29

View File

@ -112,7 +112,7 @@ TiddlyWiki >> detectRepositoryLocal [
| folder folderItems | | folder folderItems |
folder := self file parent. folder := self file parent.
folderItems := folder children. folderItems := folder children.
[(folderItems select: [ :path | path basename beginsWith: '.fossil' ]) isEmpty [(folderItems select: [ :path | path basename beginsWith: '.fslckout' ]) isEmpty
and:[ (folder = FileLocator root) not ]] and:[ (folder = FileLocator root) not ]]
whileTrue: [folder := folder parent. whileTrue: [folder := folder parent.
folderItems := folder children.]. folderItems := folder children.].