Fixing non uid assignation when other custom fields are already present.
This commit is contained in:
parent
3f792e84a7
commit
de0655c12e
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user