perl-OpenGL-build.patch

   1 Don't check current display for extensions, build all.
   2
   3 diff -up OpenGL-0.62/Makefile.PL.dist OpenGL-0.62/Makefile.PL
   4 --- OpenGL-0.62/Makefile.PL.dist        2009-12-11 01:10:00.000000000 +0100
   5 +++ OpenGL-0.62/Makefile.PL     2010-01-07 13:00:26.000000000 +0100
   6 @@ -579,9 +579,9 @@ my $build_config =
   7    {
   8      FILES =>
   9        "Config.pm ".
  10 -      "utils/glversion.txt ".
  11 -      "utils/glversion$Config{exe_ext} ".
  12 -      "utils/glversion$Config{obj_ext}"
  13 +      "utils/glversion.txt "
  14 +      #"utils/glversion$Config{exe_ext} ".
  15 +      #"utils/glversion$Config{obj_ext}"
  16    }
  17  };
  18
  19 @@ -790,6 +790,7 @@ sub get_extensions
  20      print "GLUT not found\n";
  21    }
  22
  23 +=cut
  24    # Platform-specific makefiles for glversion
  25    my $make_ver;
  26    if ($IS_MINGW)
  27 @@ -848,7 +849,9 @@ sub get_extensions
  28       print "get_extensions: no extensions found in $glv_file\n" if $verbose;
  29       return '';
  30    }
  31 -
  32 +=cut
  33 +  use Config;
  34 +  my $gldata = { };
  35
  36    # Parse glext_procs.h file
  37    return '' if (!open(GLEXT,"glext_procs.h"));
  38 @@ -867,10 +870,12 @@ sub get_extensions
  39
  40    # Create gl_exclude.h
  41    die "Unable to write to $exc_file\n" if (!open(GLEXC,">$exc_file"));
  42 +=cut
  43    print GLEXC "// OpenGL Extension Exclusions - may be modified before building.\n";
  44    print GLEXC "//\n";
  45    print GLEXC "// Generated for ".$gldata->{VENDOR}.", ".$gldata->{RENDERER}."\n";
  46    print GLEXC "// OpenGL v".$gldata->{VERSION}.", using ";
  47 +=cut
  48
  49    # Fix GLUT flags based on results
  50    if ($gldata->{GLUT} > 0)