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 ]).
|
revision: (aDictionary at: 'revision' ifAbsentPut: [ nil ]).
|
||||||
customKeys := aDictionary keys
|
customKeys := aDictionary keys
|
||||||
copyWithoutAll: (self class instanceVariables collect: [ :each | each name ]).
|
copyWithoutAll: (self class instanceVariables collect: [ :each | each name ]).
|
||||||
customKeys ifEmpty: [ self uidGenerator ].
|
(customKeys includesKey: 'uid') ifFalse: [ self uidGenerator ].
|
||||||
customKeys do: [:key | | valueTemp |
|
customKeys do: [:key | | valueTemp |
|
||||||
valueTemp := aDictionary at: key.
|
valueTemp := aDictionary at: key.
|
||||||
valueTemp class = Array
|
valueTemp class = Array
|
||||||
|
Loading…
Reference in New Issue
Block a user