Skip to content

Commit 5f22958

Browse files
committed
move imports next to use
1 parent c8bed65 commit 5f22958

1 file changed

Lines changed: 3 additions & 6 deletions

File tree

  • lib/PDL/Graphics/TriD

lib/PDL/Graphics/TriD/GL.pm

Lines changed: 3 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,5 @@
11
use strict;
22
use warnings;
3-
use OpenGL::Modern qw/
4-
glRotatef glTranslatef
5-
GL_LINE_STRIP GL_LINE_LOOP
6-
GL_MODELVIEW GL_PROJECTION
7-
/;
8-
use PDL::Core qw(barf);
93

104
{ package # hide from PAUSE
115
PDL::Graphics::TriD::Material;
@@ -52,6 +46,7 @@ sub PDL::Graphics::TriD::Graph::togl {
5246
}
5347
}
5448

49+
use OpenGL::Modern qw(glRotatef);
5550
use POSIX qw//;
5651
sub PDL::Graphics::TriD::Quaternion::togl {
5752
my($this) = @_;
@@ -528,6 +523,7 @@ sub gdraw {
528523
}
529524
}
530525

526+
use OpenGL::Modern qw(GL_LINE_STRIP GL_LINE_LOOP);
531527
my %mode2enum = (
532528
linestrip => GL_LINE_STRIP,
533529
lineloop => GL_LINE_LOOP,
@@ -600,6 +596,7 @@ sub gdraw {
600596
}
601597
}
602598

599+
use OpenGL::Modern qw(glTranslatef);
603600
sub PDL::Graphics::TriD::SimpleController::togl {
604601
my($this) = @_;
605602
$this->{CRotation}->togl();

0 commit comments

Comments
 (0)