Skip to content

Commit 4326e4f

Browse files
committed
remove all calls to gl_*_nc funcs
1 parent a0f39e9 commit 4326e4f

File tree

1 file changed

+3
-5
lines changed
  • lib/PDL/Graphics/TriD

1 file changed

+3
-5
lines changed

lib/PDL/Graphics/TriD/GL.pm

Lines changed: 3 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -111,7 +111,7 @@ sub PDL::Graphics::TriD::EuclidAxes::gdraw {
111111
push @label, @{$this->{Names}};
112112
glColor3d(1,1,1);
113113
PDL::Graphics::OpenGLQ::gl_texts($this->{EndsPlus}, \@label);
114-
PDL::gl_lines_nc($points);
114+
PDL::gl_line_strip_col($points, [1,1,1]);
115115
}
116116

117117
use POSIX qw//;
@@ -269,8 +269,7 @@ sub PDL::Graphics::TriD::Trigrid::gdraw {
269269
}
270270
}
271271
if ($options->{Lines}) {
272-
glColor3f(0,0,0);
273-
PDL::gl_lines_nc($faces->dice_axis(1,[0,1,2,0]));
272+
PDL::gl_lines_col($faces->dice_axis(1,[0,1,2,0]), [0,0,0]);
274273
}
275274
}
276275

@@ -571,8 +570,7 @@ sub highlight {
571570
glLoadIdentity();
572571
glOrtho(0,$vp->{W},0,$vp->{H},-1,1);
573572
glLineWidth(4);
574-
glColor3f(1,1,1);
575-
gl_line_strip_nc($pts);
573+
gl_line_strip_col($pts, [1,1,1]);
576574
glLineWidth(1);
577575
glEnable(GL_LIGHTING);
578576
}

0 commit comments

Comments
 (0)