From de0655c12e151b71a9c52f3492ead9e605901726 Mon Sep 17 00:00:00 2001
From: Offray Luna <offray.luna@mutabit.com>
Date: Mon, 8 Aug 2022 23:01:58 -0500
Subject: [PATCH] Fixing non uid assignation when other custom fields are
 already present.

---
 repository/TiddlyWiki/Tiddler.class.st | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/repository/TiddlyWiki/Tiddler.class.st b/repository/TiddlyWiki/Tiddler.class.st
index f437f46..19b1348 100644
--- a/repository/TiddlyWiki/Tiddler.class.st
+++ b/repository/TiddlyWiki/Tiddler.class.st
@@ -234,7 +234,7 @@ Tiddler >> fromDictionary: aDictionary [
 		revision: (aDictionary at: 'revision' ifAbsentPut: [ nil ]).
 	customKeys := aDictionary keys 
 		copyWithoutAll: (self class instanceVariables collect: [ :each | each name ]).
-	customKeys ifEmpty: [ self uidGenerator ].
+	(customKeys includesKey: 'uid') ifFalse: [ self uidGenerator ].
 	customKeys do: [:key | | valueTemp |
 		valueTemp :=  aDictionary at: key.
 		valueTemp class = Array