From fbfb5fbf7d0fcb20ccb45abd1752aa92cb4201e1 Mon Sep 17 00:00:00 2001
From: ruidajo <diegoruidajo@gmail.com>
Date: Sun, 30 Oct 2022 22:20:36 -0500
Subject: [PATCH] Creating tiddler uid test and TW tiddlers missing uid
 collection.

---
 repository/TiddlyWiki/Tiddler.class.st    | 6 ++++++
 repository/TiddlyWiki/TiddlyWiki.class.st | 6 ++++++
 2 files changed, 12 insertions(+)

diff --git a/repository/TiddlyWiki/Tiddler.class.st b/repository/TiddlyWiki/Tiddler.class.st
index 28ab1b0..5585cc2 100644
--- a/repository/TiddlyWiki/Tiddler.class.st
+++ b/repository/TiddlyWiki/Tiddler.class.st
@@ -267,6 +267,12 @@ Tiddler >> gtTextFor: aView [
 		text: [ text ]
 ]
 
+{ #category : #testing }
+Tiddler >> hasUID [
+
+	^ self customFields includesKey: 'uid'
+]
+
 { #category : #accessing }
 Tiddler >> importFedWikiPage: pageViewUrlString [
 	| pageTitle pageViewUrl pageData |
diff --git a/repository/TiddlyWiki/TiddlyWiki.class.st b/repository/TiddlyWiki/TiddlyWiki.class.st
index b825077..b18a4cf 100644
--- a/repository/TiddlyWiki/TiddlyWiki.class.st
+++ b/repository/TiddlyWiki/TiddlyWiki.class.st
@@ -827,6 +827,12 @@ TiddlyWiki >> tiddlersJSONUrl [
 	self remote ifNil: [^ nil].
 ]
 
+{ #category : #accessing }
+TiddlyWiki >> tiddlersMissingUID [
+
+	^ self tiddlers reject: [ :tiddler | (tiddler customFields includesKey: 'uid') or: [ (tiddler title beginsWith:'$') ] ].
+]
+
 { #category : #accessing }
 TiddlyWiki >> updateFilesFromRemote [