Support skeining multiple files from the command line. Update the status output to include input and export filenames.

degen-loop-screen
Owen Stenseth 2012-02-21 09:26:54 -07:00
parent aa7a5d6069
commit c539a8d9e0
2 changed files with 14 additions and 16 deletions

View File

@ -23,6 +23,7 @@ sub go {
# skein the STL into layers
# each layer has surfaces with holes
$self->status_cb->(5, "Processing input file " . $self->input_file);
$self->status_cb->(10, "Processing triangulated mesh");
my $print;
if ($self->input_file =~ /\.stl$/i) {
@ -127,8 +128,8 @@ sub go {
$print->extrude_skirt;
# output everything to a GCODE file
$self->status_cb->(90, "Exporting GCODE");
my $output_file = $self->expanded_output_filepath;
$self->status_cb->(90, "Exporting GCODE to $output_file");
$print->export_gcode($output_file);
# run post-processing scripts

View File

@ -71,21 +71,18 @@ if (!@ARGV && !$opt{save} && eval "require Slic3r::GUI; 1") {
exit;
}
if ($ARGV[0]) {
# skein
my $input_file = $ARGV[0];
my $skein = Slic3r::Skein->new(
input_file => $input_file,
output_file => $opt{output},
status_cb => sub {
my ($percent, $message) = @_;
printf "=> $message\n";
},
);
$skein->go;
if (@ARGV) {
foreach my $input_file ( @ARGV ) {
my $skein = Slic3r::Skein->new(
input_file => $input_file,
output_file => $opt{output},
status_cb => sub {
my ($percent, $message) = @_;
printf "=> $message\n";
},
);
$skein->go;
}
} else {
usage(1) unless $opt{save};
}