Accessors for improved code ergonomy.
This commit is contained in:
parent
4b49160bb1
commit
22a17d6d14
@ -39,7 +39,7 @@ TiddlyWiki >> addRecentChangesToRepo [
|
|||||||
exportJSONFile;
|
exportJSONFile;
|
||||||
importJSONFile.
|
importJSONFile.
|
||||||
recentTiddlers := self changesAfter: repository checkoutDateAndTime.
|
recentTiddlers := self changesAfter: repository checkoutDateAndTime.
|
||||||
docsSton := recentTiddlers collect: [:each | each exportSTONFile].
|
docsSton := recentTiddlers collect: [:each | each exportSTONFileOptimized ].
|
||||||
"Collecting tiddlers file reference as string and adding to the repo"
|
"Collecting tiddlers file reference as string and adding to the repo"
|
||||||
docsStonSanitized := docsSton collect: [ :each |
|
docsStonSanitized := docsSton collect: [ :each |
|
||||||
(each fullName removePrefix: repository localRoot) allButFirst ].
|
(each fullName removePrefix: repository localRoot) allButFirst ].
|
||||||
@ -273,6 +273,11 @@ TiddlyWiki >> file: anObject [
|
|||||||
file := anObject
|
file := anObject
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
TiddlyWiki >> folder [
|
||||||
|
^ self file parent
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
TiddlyWiki >> fromDictionary: tiddlersDict [
|
TiddlyWiki >> fromDictionary: tiddlersDict [
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user