Disable arc compensation code

This commit is contained in:
Alessandro Ranellucci 2012-06-23 20:17:41 +02:00
parent 44c636aea1
commit ac08cf7469

View File

@ -221,6 +221,7 @@ sub make_perimeters {
my $distance = 0; my $distance = 0;
# experimental hole compensation (see ArcCompensation in the RepRap wiki) # experimental hole compensation (see ArcCompensation in the RepRap wiki)
if (0) {
foreach my $hole ($last_offsets[0]->holes) { foreach my $hole ($last_offsets[0]->holes) {
my $circumference = abs($hole->length); my $circumference = abs($hole->length);
next unless $circumference <= $Slic3r::small_perimeter_length; next unless $circumference <= $Slic3r::small_perimeter_length;
@ -240,6 +241,7 @@ sub make_perimeters {
@$hole = map Slic3r::Point->new($_), @{ $offsetted[0] } if @offsetted == 1; @$hole = map Slic3r::Point->new($_), @{ $offsetted[0] } if @offsetted == 1;
$hole->reverse; $hole->reverse;
} }
}
my @gaps = (); my @gaps = ();