Fix --export-svg
This commit is contained in:
parent
ac5e713323
commit
f603db5e84
1 changed files with 1 additions and 1 deletions
|
@ -488,7 +488,7 @@ sub export_svg {
|
||||||
$_->slice for @{$self->objects};
|
$_->slice for @{$self->objects};
|
||||||
|
|
||||||
my $fh = $params{output_fh};
|
my $fh = $params{output_fh};
|
||||||
if ($params{output_file}) {
|
if (!$fh) {
|
||||||
my $output_file = $self->expanded_output_filepath($params{output_file});
|
my $output_file = $self->expanded_output_filepath($params{output_file});
|
||||||
$output_file =~ s/\.gcode$/.svg/i;
|
$output_file =~ s/\.gcode$/.svg/i;
|
||||||
Slic3r::open(\$fh, ">", $output_file) or die "Failed to open $output_file for writing\n";
|
Slic3r::open(\$fh, ">", $output_file) or die "Failed to open $output_file for writing\n";
|
||||||
|
|
Loading…
Reference in a new issue