fixed GLX_ token in glew.h bug

git-svn-id: https://glew.svn.sourceforge.net/svnroot/glew/trunk/glew@312 783a27ee-832a-0410-bc00-9f386506c6dd
This commit is contained in:
ikits 2004-12-06 08:14:52 +00:00
parent 6c449294c8
commit 9a294ee851

View File

@ -292,7 +292,7 @@ foreach my $spec (sort @speclist)
$prefix =~ s/^(.+?)(_.+)$/$1/;
foreach my $token (sort { hex ${$tokens}{$a} <=> hex ${$tokens}{$b} } keys %{$tokens})
{
if ($token =~ /^$prefix.*/i)
if ($token =~ /^$prefix\_.*/i)
{
print EXT "\t" . $token . " " . ${%{$tokens}}{$token} . "\n";
}