mirror of https://gitlab.com/basile.b/dexed.git
fixup for #178, only array items don't need a name
This commit is contained in:
parent
66b51e8577
commit
493b1fbdc5
|
@ -221,8 +221,8 @@ begin
|
||||||
1: tpe := TJSONtype.jtObject;
|
1: tpe := TJSONtype.jtObject;
|
||||||
else tpe := TJSONtype.jtString;
|
else tpe := TJSONtype.jtString;
|
||||||
end;
|
end;
|
||||||
if (tpe in [jtObject, jtString]) and (fEdName.Text = '') then
|
if fEdName.Enabled and (fEdName.Text = '') then
|
||||||
dlgOkError('This property requires a name')
|
dlgOkError('New properties require a name')
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
fEvent(fEdName.Text, tpe);
|
fEvent(fEdName.Text, tpe);
|
||||||
|
|
Loading…
Reference in New Issue