| … | |
… | |
| 449 | next if $a->{_virtual}; |
449 | next if $a->{_virtual}; |
| 450 | |
450 | |
| 451 | my $o = $ARCH{$a->{_name}} |
451 | my $o = $ARCH{$a->{_name}} |
| 452 | or (warn "archetype $a->{_name} is unknown at ($x|$y)\n", next); |
452 | or (warn "archetype $a->{_name} is unknown at ($x|$y)\n", next); |
| 453 | |
453 | |
| 454 | my $face = $FACE{$a->{face} || $o->{face}} |
454 | my $face = $FACE{$a->{face} || $o->{face} || "blank.111"} |
| 455 | or (warn "no gfx found for arch '$a->{_name}' at ($x|$y)\n"), next; |
455 | or (warn "no gfx found for arch '$a->{_name}' at ($x|$y)\n"), next; |
| 456 | |
456 | |
| 457 | $a->{_face} = $face->{idx}; |
457 | $a->{_face} = $face->{idx}; |
| 458 | |
458 | |
| 459 | if ($face->{w} > 1 || $face->{h} > 1) { |
459 | if ($face->{w} > 1 || $face->{h} > 1) { |
