Package: libopengl-perl / 0.7000+dfsg-3

glext.patch Patch series | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Description: change path to GL/glext.h to the system one
Origin: vendor
Forwarded: not needed
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2019-02-13

--- a/utils/glext_procs.pl
+++ b/utils/glext_procs.pl
@@ -1,5 +1,5 @@
 $|++;
-my $file = '../include/GL/glext.h';
+my $file = '/usr/include/GL/glext.h';
 die "Unable to read '$file'" if (!open(FILE,$file));
 
 my $exts = '../glext_procs.h';
@@ -123,7 +123,7 @@
         print EXTS $line2;
         $in_TYPES-- if $in_TYPES == 1 and $line2 !~ m|^typedef|;
         print TYPE $line2 if $in_TYPES;
-        print TYPE $line2 if !$in_TYPES and $line2 =~ m|^typedef \w+ \w+;|;
+        print TYPE $line2 if !$in_TYPES and ($line2 =~ m|^typedef \w+ \w+;| or $line2 =~ m|^#include|);
 
         if ($line2 =~ m|APIENTRY (gl[^\s]+)|)
         {