… | |
… | |
276 | my $x = $o->{x} - $dx; |
276 | my $x = $o->{x} - $dx; |
277 | my $y = $o->{y} - $dy; |
277 | my $y = $o->{y} - $dy; |
278 | |
278 | |
279 | my $ext = $x|$y ? "+$x+$y" : ""; |
279 | my $ext = $x|$y ? "+$x+$y" : ""; |
280 | |
280 | |
281 | $o->{face} .= $ext unless /^blank.x11$|^empty.x11$/; |
281 | $o->{face} .= $ext unless /^blank.x11$|^empty.x11$/ || !$o->{face}; |
282 | |
282 | |
283 | my $visibility = delete $o->{visibility} if exists $o->{visibility}; |
283 | my $visibility = delete $o->{visibility} if exists $o->{visibility}; |
284 | my $magicmap = delete $o->{magicmap} if exists $o->{magicmap}; |
284 | my $magicmap = delete $o->{magicmap} if exists $o->{magicmap}; |
285 | |
285 | |
286 | my $anim = delete $o->{anim}; |
286 | my $anim = delete $o->{anim}; |