diff --git a/repository/TiddlyWiki/Tiddler.class.st b/repository/TiddlyWiki/Tiddler.class.st
index 67a56a1..1d2408f 100644
--- a/repository/TiddlyWiki/Tiddler.class.st
+++ b/repository/TiddlyWiki/Tiddler.class.st
@@ -187,6 +187,11 @@ Tiddler >> printOn: aStream [
 		nextPutAll: '( ', self title, ' )'
 ]
 
+{ #category : #accessing }
+Tiddler >> rawLinks [
+	^ (WikiTextGrammar new linkSea star parse: self text) asSet
+]
+
 { #category : #accessing }
 Tiddler >> tags [
 
diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st
index ba5821f..68a3b77 100644
--- a/repository/TiddlyWiki/TiddlyWiki.class.st
+++ b/repository/TiddlyWiki/TiddlyWiki.class.st
@@ -39,6 +39,13 @@ TiddlyWiki >> printOn: aStream [
 		nextPutAll: '( ', self file basename ,' )'
 ]
 
+{ #category : #accessing }
+TiddlyWiki >> taggedWith: aTag [
+	^ self tiddlers select: [:tiddler | 
+		tiddler tags isNotNil and: [tiddler tags includesSubstring: aTag ]
+	]
+]
+
 { #category : #accessing }
 TiddlyWiki >> tiddlers [