Bugfix: bad syntax in last commit. #202
This commit is contained in:
parent
dbb40095b7
commit
0deee20ade
1 changed files with 6 additions and 4 deletions
|
@ -39,10 +39,12 @@ sub group {
|
|||
|
||||
sub offset {
|
||||
my $self = shift;
|
||||
return map (ref $self)->new(
|
||||
expolygon => $_,
|
||||
map { $_ => $self->$_ } qw(surface_type depth_layers bridge_angle),
|
||||
), $self->expolygon->offset_ex(@_);
|
||||
return map {
|
||||
(ref $self)->new(
|
||||
expolygon => $_,
|
||||
map { $_ => $self->$_ } qw(surface_type depth_layers bridge_angle),
|
||||
)
|
||||
} $self->expolygon->offset_ex(@_);
|
||||
}
|
||||
|
||||
sub add_hole {
|
||||
|
|
Loading…
Reference in a new issue