PublicCodeMirror/OrcaSlicer-bambulab
1
0
Fork 0
mirror of https://github.com/FULU-Foundation/OrcaSlicer-bambulab.git synced 2026-05-14 19:12:38 -07:00
Code Issues Packages Projects Releases Wiki Activity

Got rid of the Perl Format::STL, Format::AMF, Format::OBJ for good.

Browse Source
This commit is contained in:
bubnikv
2017-02-27 01:03:00 +01:00
parent f0f550783f
commit ee619701d8
11 changed files with 14 additions and 146 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
utils/amf-to-stl.pl
View File

@@ -30,7 +30,7 @@ my %opt = ();
$output_file =~ s/\.amf(?:\.xml)?$/\.stl/i;
printf "Writing to %s\n", basename($output_file);
Slic3r::Format::STL->write_file($output_file, $model, binary => !$opt{ascii});
$model->store_stl(Slic3r::encode_path($output_file), binary => !$opt{ascii});
}

2
utils/dump-stl.pl
View File

@@ -27,7 +27,7 @@ if (-e $ARGV[0]) {
exit 0;
} elsif ((my $model = Slic3r::Test::model($ARGV[0]))) {
$ARGV[1] or die "Missing writeable destination as second argument\n";
Slic3r::Format::STL->write_file($ARGV[1], $model);
$model->store_stl(Slic3r::encode_path($ARGV[1]), 1);
printf "Model $ARGV[0] written to $ARGV[1]\n";
exit 0;
} else {

2
utils/split_stl.pl
View File

@@ -43,7 +43,7 @@ my %opt = ();
my $output_file = sprintf '%s_%02d.stl', $basename, ++$part_count;
printf "Writing to %s\n", basename($output_file);
Slic3r::Format::STL->write_file($output_file, $new_model, binary => !$opt{ascii});
$new_model->store_stl(Slic3r::encode_path($output_file), !$opt{ascii});
}
}

2
utils/stl-to-amf.pl
View File

@@ -53,7 +53,7 @@ my %opt = ();
}
printf "Writing to %s\n", basename($output_file);
Slic3r::Format::AMF->write_file($output_file, $new_model);
$new_model->store_amf(Slic3r::encode_path($output_file));
}