| … | |
… | |
| 352 | # check whether attachment is the same as in the archetype |
352 | # check whether attachment is the same as in the archetype |
| 353 | if (exists $ob->{attach}) { |
353 | if (exists $ob->{attach}) { |
| 354 | my $arch = $ARCH{$ob->{_name}}; |
354 | my $arch = $ARCH{$ob->{_name}}; |
| 355 | my $js = JSON::XS->new->utf8->canonical (1); |
355 | my $js = JSON::XS->new->utf8->canonical (1); |
| 356 | |
356 | |
|
|
357 | if (defined $arch->{attach} |
| 357 | if ($js->encode ($js->decode ($ob->{attach})) eq $js->encode ($arch->{attach})) { |
358 | && $js->encode ($js->decode ($ob->{attach})) eq $js->encode ($arch->{attach})) { |
| 358 | delete $ob->{attach} |
359 | delete $ob->{attach} |
| 359 | } |
360 | } |
| 360 | } |
361 | } |
| 361 | |
362 | |
| 362 | # color_fg is used as default for magicmap if magicmap does not exist |
363 | # color_fg is used as default for magicmap if magicmap does not exist |
