[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