Little more reduce of Perl bindings
This commit is contained in:
parent
3687bc28d5
commit
d88e9634f5
8 changed files with 3 additions and 67 deletions
|
@ -5,12 +5,6 @@ use warnings;
|
|||
# a line is a two-points line
|
||||
use parent 'Slic3r::Polyline';
|
||||
|
||||
sub intersection {
|
||||
my $self = shift;
|
||||
my ($line, $require_crossing) = @_;
|
||||
return Slic3r::Geometry::line_intersection($self, $line, $require_crossing);
|
||||
}
|
||||
|
||||
sub grow {
|
||||
my $self = shift;
|
||||
return Slic3r::Polyline->new(@$self)->grow(@_);
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue