prevent possible program mix up with sw vps (Roland Scheidegger)

src/mesa/drivers/dri/r300/r300_shader.c

@@ -86,6 +86,8 @@ static void r300ProgramStringNotify(GLcontext *ctx, GLenum target,
 		fp->translated = GL_FALSE;
 	break;
 	}
+	/* need this for tcl fallbacks */
+	_tnl_program_string(ctx, target, prog);
 }
 
 static GLboolean r300IsProgramNative(GLcontext *ctx, GLenum target, struct program *prog)