diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st index 33175a9..4ed243b 100644 --- a/repository/TiddlyWiki/TiddlyWiki.class.st +++ b/repository/TiddlyWiki/TiddlyWiki.class.st @@ -236,11 +236,21 @@ TiddlyWiki >> tiddlersJSONUrl [ ] { #category : #accessing } -TiddlyWiki >> withoutImages [ +TiddlyWiki >> withoutApplicationType: application [ | filteredTiddlers tempWiki | - filteredTiddlers := self tiddlers reject: [:tiddler | tiddler type isNotNil and: [tiddler type beginsWith: 'image/'] ]. + filteredTiddlers := self tiddlers reject: [:tiddler | tiddler type isNotNil and: [tiddler type beginsWith: application] ]. tempWiki := self copy tiddlers: filteredTiddlers. tempWiki tiddlers do: [:tiddler | tiddler wiki: tempWiki ]. ^ tempWiki ] + +{ #category : #accessing } +TiddlyWiki >> withoutImages [ + ^ self withoutApplicationType: 'image/' +] + +{ #category : #accessing } +TiddlyWiki >> withoutPDFs [ + ^ self withoutApplicationType: 'application/pdf' +]