Commit f470c3a1 authored by Christoph Cullmann's avatar Christoph Cullmann

speedup

parent 5c3cdf9d
......@@ -43,6 +43,7 @@ sub start_tag
my($p, $tag, %attrs) = @_;
if ($tag eq "language") {
%languageAttributes = %attrs;
$p->finish();
}
}
my $parser = XML::Parser->new( Handlers => { Start => \&start_tag });
......@@ -132,7 +133,6 @@ foreach my $section (sort keys %nameToFile) {
print $syntax_page "\n### $section\n";
foreach my $name (sort keys %{$nameToFile{$section}}) {
my $file = $nameToFile{$section}{$name};
my $version = $metaInfo{$file}{version};
print $syntax_page "* [$name](/syntax/$file)\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