Prevent warnings when zooming on uninitialized 3D canvas

This commit is contained in:
Alessandro Ranellucci 2014-07-26 17:15:47 +02:00
parent 53f2d6bb4b
commit 9f7734abeb

View File

@ -379,6 +379,7 @@ sub mouse_to_3d {
sub ZoomTo {
my ($self, $factor, $tox, $toy) = @_;
return if !$self->init;
glTranslatef($tox, $toy, 0);
glMatrixMode(GL_MODELVIEW);
$self->Zoom($factor);