Class {
	#name : #TWServer,
	#superclass : #Object,
	#instVars : [
		'wikis'
	],
	#category : #TiddlyWiki
}

{ #category : #'instance creation' }
TWServer class >> new [

	| instance |
	instance := super new.
	^ instance
		wikis: Dictionary new
	
]

{ #category : #'export - json' }
TWServer >> exportTiddlersFrom: aWikiName tagged: aTag into: aFolder [ 

	| wiki |
	wiki := wikis at: aWikiName.
	^ wiki exportJSONTiddlersTagged: aTag in: aFolder
]

{ #category : #accessing }
TWServer >> wikiNames [

	| return |
	return := OrderedCollection new.
	wikis keysDo: [ :key | return add: key ].
	^ return
]

{ #category : #accessing }
TWServer >> wikis: aTiddlyWikisDictionary [

	wikis := aTiddlyWikisDictionary
]