diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st index 79170e4..33175a9 100644 --- a/repository/TiddlyWiki/TiddlyWiki.class.st +++ b/repository/TiddlyWiki/TiddlyWiki.class.st @@ -98,6 +98,16 @@ TiddlyWiki >> fromDictionary: tiddlersDict [ wiki: self ]) ] +{ #category : #accessing } +TiddlyWiki >> fromUrl: anUrlString [ + | docTree rawJsonTiddlers tiddlersDictionary | + self remote: anUrlString. + docTree := XMLHTMLParser parse: (self remote retrieveContents). + rawJsonTiddlers := (docTree xpath: '//script[@class="tiddlywiki-tiddler-store"]') stringValue. + tiddlersDictionary := STONJSON fromString: rawJsonTiddlers. + self fromDictionary: tiddlersDictionary +] + { #category : #accessing } TiddlyWiki >> importJSONFile [