From 5480dcf42d28a75081e349a24cbb7dc41a99be5a Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Fri, 14 Oct 2005 14:11:20 +0000
Subject: [PATCH] [ 1325296 ] sort by editform field in collaboration in random
 order

---
 docs/changelog/6.x.x.txt                  |  1 +
 lib/WebGUI/Asset/Wobject/Collaboration.pm | 15 +++++++++------
 2 files changed, 10 insertions(+), 6 deletions(-)

diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt
index 2d4fa84b8..27adc4cc7 100644
--- a/docs/changelog/6.x.x.txt
+++ b/docs/changelog/6.x.x.txt
@@ -16,6 +16,7 @@
  - fix [ 1306722 ] 6.7.5 Add an event only on TODAY
  - fix [ 1323057 ] Anchors break XHTML 1.1
  - fixed "Fail Safe" template (admin bar doesn't overlap content anymore)
+ - fix [ 1325296 ] sort by editform field in collaboration in random order
  - fixed lots of XHTML bugs in templates and code
  - fix [ 1301604 ] Survey in 6.7.5 gamma
  - fix [ 1310360 ] WebGUI::FormProcessor::checkbox not working correctly
diff --git a/lib/WebGUI/Asset/Wobject/Collaboration.pm b/lib/WebGUI/Asset/Wobject/Collaboration.pm
index 6b8109e51..e0df42fd4 100644
--- a/lib/WebGUI/Asset/Wobject/Collaboration.pm
+++ b/lib/WebGUI/Asset/Wobject/Collaboration.pm
@@ -11,7 +11,7 @@ package WebGUI::Asset::Wobject::Collaboration;
 #-------------------------------------------------------------------
 
 use strict;
-use Tie::CPHash;
+use Tie::IxHash;
 use WebGUI::DateTime;
 use WebGUI::Group;
 use WebGUI::Grouping;
@@ -526,10 +526,9 @@ sub getEditForm {
 		-label=>WebGUI::International::get('filter code', 'Asset_Collaboration'),
 		-hoverHelp=>WebGUI::International::get('filter code description', 'Asset_Collaboration'),
 		);
-	$tabform->getTab("display")->selectList(
-		-name=>"sortBy",
-		-value=>[$self->getValue("sortBy")],
-		-options=>{
+	my %options;
+	tie %options, 'Tie::IxHash';
+	%options = (
 			lineage=>WebGUI::International::get('sequence', 'Asset_Collaboration'),
 			dateUpdated=>WebGUI::International::get('date updated', 'Asset_Collaboration'),
 			dateSubmitted=>WebGUI::International::get('date submitted', 'Asset_Collaboration'),
@@ -539,7 +538,11 @@ sub getEditForm {
 			userDefined3=>WebGUI::International::get('user defined 3', 'Asset_Collaboration'),
 			userDefined4=>WebGUI::International::get('user defined 4', 'Asset_Collaboration'),
 			userDefined5=>WebGUI::International::get('user defined 5', 'Asset_Collaboration'),
-			},
+			);
+	$tabform->getTab("display")->selectList(
+		-name=>"sortBy",
+		-value=>[$self->getValue("sortBy")],
+		-options=>\%options,
 		-label=>WebGUI::International::get('sort by', 'Asset_Collaboration'),
 		-hoverHelp=>WebGUI::International::get('sort by description', 'Asset_Collaboration'),
 		);