Free @_ before spawning a new thread (known old Perl bug) as an attempt to fix the unref scalars error

This commit is contained in:
Alessandro Ranellucci 2013-05-19 17:34:33 +02:00
parent 48e37f97b4
commit 5494f4f385
3 changed files with 4 additions and 0 deletions

View file

@ -545,6 +545,7 @@ sub export_gcode {
$self->statusbar->StartBusy;
if ($Slic3r::have_threads) {
@_ = ();
$self->{export_thread} = threads->create(sub {
$self->export_gcode2(
$print,
@ -739,6 +740,7 @@ sub make_thumbnail {
}
};
@_ = ();
$Slic3r::have_threads ? threads->create($cb)->detach : $cb->();
}