0025305: Visualization, TKOpenGl - support stipple line aspects within built-in GLSL...

[occt.git] / src / OpenGl / OpenGl_ShaderManager.hxx

diff --git a/src/OpenGl/OpenGl_ShaderManager.hxx b/src/OpenGl/OpenGl_ShaderManager.hxx
index b08d866..7573314 100644 (file)
--- a/src/OpenGl/OpenGl_ShaderManager.hxx
+++ b/src/OpenGl/OpenGl_ShaderManager.hxx
@@ -105,7 +105,12 @@ public:
       return bindProgramWithState (theCustomProgram, theAspect);
     }
 
-    const Standard_Integer        aBits    = getProgramBits (theTexture, theHasVertColor);
+    Standard_Integer aBits = getProgramBits (theTexture, theHasVertColor);
+    if (theAspect->Type() != Aspect_TOL_SOLID)
+    {
+      aBits |= OpenGl_PO_StippleLine;
+    }
+
     Handle(OpenGl_ShaderProgram)& aProgram = getStdProgram (theToLightOn, aBits);
     return bindProgramWithState (aProgram, theAspect);
   }