Commit fda28dbf authored by Nigel Stewart's avatar Nigel Stewart
Browse files

[CoreSupport] Tab indentation for perl scripts

parent fc840558
...@@ -19,13 +19,13 @@ our $type = shift; ...@@ -19,13 +19,13 @@ our $type = shift;
if (@ARGV) if (@ARGV)
{ {
@extlist = @ARGV; @extlist = @ARGV;
foreach my $ext (sort @extlist) foreach my $ext (sort @extlist)
{ {
my ($extname, $exturl, $extstring, $types, $tokens, $functions, $exacts) = parse_ext($ext); my ($extname, $exturl, $extstring, $types, $tokens, $functions, $exacts) = parse_ext($ext);
my $extvar = $extname; my $extvar = $extname;
$extvar =~ s/GL(X*)_/GL$1EW_/; $extvar =~ s/GL(X*)_/GL$1EW_/;
print "GLboolean " . prefix_varname($extvar) . " = GL_FALSE;\n"; print "GLboolean " . prefix_varname($extvar) . " = GL_FALSE;\n";
} }
} }
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment