| … | |
… | |
| 339 | |
339 | |
| 340 | # object as in "Object xxx", i.e. archetypes |
340 | # object as in "Object xxx", i.e. archetypes |
| 341 | sub normalize_object($) { |
341 | sub normalize_object($) { |
| 342 | my ($ob) = @_; |
342 | my ($ob) = @_; |
| 343 | |
343 | |
|
|
344 | delete $ob->{editable}; # deprecated |
|
|
345 | |
| 344 | # convert material bitset to materialname, if possible |
346 | # convert material bitset to materialname, if possible |
| 345 | if (exists $ob->{material}) { |
347 | if (exists $ob->{material}) { |
| 346 | if (!$ob->{material}) { |
348 | if (!$ob->{material}) { |
| 347 | delete $ob->{material}; |
349 | delete $ob->{material}; |
| 348 | } elsif (exists $ob->{materialname}) { |
350 | } elsif (exists $ob->{materialname}) { |
