remove WebGUI::Utility::sortHash

This commit is contained in:
Graham Knop 2010-09-07 12:44:11 -05:00
parent 6aa26c2e44
commit 0adbb519f0
3 changed files with 22 additions and 12 deletions

View file

@ -232,11 +232,16 @@ sub toHtml {
foreach my $property (keys %{$properties}) {
my $key = $tableName.".".$property;
$fields{$key} = qq{$property ($tableName)};
}
}
}
%fields = (%asset,%fields);
%fields = WebGUI::Utility::sortHash(%fields);
%fields =
map { @$_ }
sort { $a->[1] cmp $b->[1] }
map { [ $_, $fields{$_} ] }
keys %fields;
$json->{$class} = \%fields;
}