[svn:parrot] r29793 - trunk/languages/lua/t

[fperrad]

Author: fperrad
Date: Sun Jul 27 06:01:41 2008
New Revision: 29793

Modified:
   trunk/languages/lua/t/gl.t

Log:
[Lua] OpenGL, check config

Modified: trunk/languages/lua/t/gl.t
==============================================================================
--- trunk/languages/lua/t/gl.t  (original)
+++ trunk/languages/lua/t/gl.t  Sun Jul 27 06:01:41 2008
@@ -25,12 +25,16 @@
 
 use Parrot::Test;
 use Test::More;
+use Parrot::Config;
 use Parrot::Test::Lua;
 
 my $test_prog = Parrot::Test::Lua::get_test_prog();
 if ( $test_prog eq 'lua' ) {
     plan skip_all => "parrot only";
 }
+elsif ( !$PConfig{has_opengl} ) {
+    plan skip_all => "OpenGL needed";
+}
 else {
     plan tests => 1;
 }