Make OpenGL::Array thread-safe, thus fixing the crash after the cut dialog is closed in threaded perl
This commit is contained in:
parent
c81ffc391d
commit
fc3a73afe8
1 changed files with 3 additions and 0 deletions
|
@ -23,6 +23,9 @@ use constant TURNTABLE_MODE => 1;
|
|||
use constant SELECTED_COLOR => [0,1,0,1];
|
||||
use constant COLORS => [ [1,1,1], [1,0.5,0.5], [0.5,1,0.5], [0.5,0.5,1] ];
|
||||
|
||||
# make OpenGL::Array thread-safe
|
||||
*OpenGL::Array::CLONE_SKIP = sub { 1 };
|
||||
|
||||
sub new {
|
||||
my ($class, $parent, $object) = @_;
|
||||
my $self = $class->SUPER::new($parent);
|
||||
|
|
Loading…
Reference in a new issue