Fixing tiddler exporter by tag.
This commit is contained in:
parent
f0edf4c437
commit
fadbdf7ec2
@ -281,6 +281,7 @@ TiddlyWiki >> exportJSONTiddlersTagged: aTag in: aFolder [
|
|||||||
TiddlyWiki >> exportJSONTiddlersTagged: aTag in: aFolder named: aFileName [
|
TiddlyWiki >> exportJSONTiddlersTagged: aTag in: aFolder named: aFileName [
|
||||||
|
|
||||||
| taggedTiddlers jsonString |
|
| taggedTiddlers jsonString |
|
||||||
|
self tiddlers.
|
||||||
taggedTiddlers := self taggedWith: aTag.
|
taggedTiddlers := self taggedWith: aTag.
|
||||||
jsonString := '[', (',' join: (taggedTiddlers collect: [ :each | each asJsonString ])), ']'.
|
jsonString := '[', (',' join: (taggedTiddlers collect: [ :each | each asJsonString ])), ']'.
|
||||||
^ MarkupFile exportAsFileOn: aFolder / (aFileName, '.json') containing: jsonString
|
^ MarkupFile exportAsFileOn: aFolder / (aFileName, '.json') containing: jsonString
|
||||||
|
Loading…
Reference in New Issue
Block a user