diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st index dd7a550..2d7d4df 100644 --- a/repository/TiddlyWiki/TiddlyWiki.class.st +++ b/repository/TiddlyWiki/TiddlyWiki.class.st @@ -281,6 +281,7 @@ TiddlyWiki >> exportJSONTiddlersTagged: aTag in: aFolder [ TiddlyWiki >> exportJSONTiddlersTagged: aTag in: aFolder named: aFileName [ | taggedTiddlers jsonString | + self tiddlers. taggedTiddlers := self taggedWith: aTag. jsonString := '[', (',' join: (taggedTiddlers collect: [ :each | each asJsonString ])), ']'. ^ MarkupFile exportAsFileOn: aFolder / (aFileName, '.json') containing: jsonString