[docs] xmldocs - racke modified bin/refs-autogen
docs at icdevgroup.org
docs at icdevgroup.org
Fri Jul 23 07:12:16 EDT 2004
User: racke
Date: 2004-07-23 11:12:15 GMT
Modified: bin refs-autogen
Log:
sort tokens alphabetically
Revision Changes Path
1.3 +2 -1 xmldocs/bin/refs-autogen
rev 1.3, prev_rev 1.2
Index: refs-autogen
===================================================================
RCS file: /anon_cvs/repository/xmldocs/bin/refs-autogen,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- refs-autogen 21 Jul 2004 20:51:57 -0000 1.2
+++ refs-autogen 23 Jul 2004 11:12:15 -0000 1.3
@@ -106,7 +106,8 @@
# Outer loop: symbol types (pragmas, globvars, ...)
# Inner loop: actual symbols
while ( my ($gkey,$gval) = each %{ $hash{symbols} } ) {
- while ( my ($key,$val) = each %{ $gval } ) {
+ for my $key (sort(keys(%$gval))) {
+ my $val = $gval->{$key};
push @{ $symbol_lists{$gkey} }, $key
# ADDER
unless grep {/^$key$/} @{ $symbol_lists{$gkey} };
More information about the docs
mailing list