From 22a17d6d145b536785ab9582fc1c30d0740b3a5d Mon Sep 17 00:00:00 2001 From: Offray Luna Date: Thu, 17 Mar 2022 15:25:25 -0500 Subject: [PATCH] Accessors for improved code ergonomy. --- repository/TiddlyWiki/TiddlyWiki.class.st | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st index 6bac430..7cd55f4 100644 --- a/repository/TiddlyWiki/TiddlyWiki.class.st +++ b/repository/TiddlyWiki/TiddlyWiki.class.st @@ -39,7 +39,7 @@ TiddlyWiki >> addRecentChangesToRepo [ exportJSONFile; importJSONFile. 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" docsStonSanitized := docsSton collect: [ :each | (each fullName removePrefix: repository localRoot) allButFirst ]. @@ -273,6 +273,11 @@ TiddlyWiki >> file: anObject [ file := anObject ] +{ #category : #accessing } +TiddlyWiki >> folder [ + ^ self file parent +] + { #category : #accessing } TiddlyWiki >> fromDictionary: tiddlersDict [