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

@ -668,8 +668,12 @@ sub www_buildTimeTable {
my ($pmAssetId) = $db->quickArray("select a.assetId from PM_wobject a, asset b where a.assetId=b.assetId and b.state not like 'trash%'");
if($pmAssetId) {
$pmAsset = WebGUI::Asset->newById($session,$pmAssetId);
my %pmProjectList = %{$pmAsset->getProjectList($user->userId)};
%projectList = WebGUI::Utility::sortHash((%projectList,%pmProjectList));
my %pmProjectList = (%projectList, %{$pmAsset->getProjectList($user->userId)});
%projectList =
map { @$_ }
sort { $a->[1] cmp $b->[1] }
map { [ $_, $pmProjectList{$_} ] }
keys %pmProjectList;
}
}