From 82cc3bcf0c9102c767b19b3f160ebd035c85f8b5 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Tue, 31 Dec 2002 19:57:18 +0000
Subject: [PATCH] fixed bug 660073

---
 lib/WebGUI/Wobject/FileManager.pm | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Wobject/FileManager.pm b/lib/WebGUI/Wobject/FileManager.pm
index 468f40bc0..046a1c843 100644
--- a/lib/WebGUI/Wobject/FileManager.pm
+++ b/lib/WebGUI/Wobject/FileManager.pm
@@ -269,14 +269,18 @@ sub www_editDownloadSave {
 #-------------------------------------------------------------------
 sub www_moveDownloadDown {
 	return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
-	$_[0]->moveCollateralDown("FileManager_file","FileManager_fileId",$session{form}{did});
+        WebGUI::Session::setScratch($namespace.".".$_[0]->get("wobjectId").".sortDirection","-delete-");
+        WebGUI::Session::setScratch($namespace.".".$_[0]->get("wobjectId").".sort","-delete-");
+	$_[0]->moveCollateralUp("FileManager_file","FileManager_fileId",$session{form}{did});
 	return "";
 }
 
 #-------------------------------------------------------------------
 sub www_moveDownloadUp {
 	return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
-	$_[0]->moveCollateralUp("FileManager_file","FileManager_fileId",$session{form}{did});
+        WebGUI::Session::setScratch($namespace.".".$_[0]->get("wobjectId").".sortDirection","-delete-");
+        WebGUI::Session::setScratch($namespace.".".$_[0]->get("wobjectId").".sort","-delete-");
+	$_[0]->moveCollateralDown("FileManager_file","FileManager_fileId",$session{form}{did});
 	return "";
 }
 
@@ -307,7 +311,7 @@ sub www_view {
 			[qw(fileTitle downloadFile alternateVersion1 alternateVersion2 briefSynopsis)]);
 		$sql .= " and ".$constraints if ($constraints ne "");
 	}
-	$sort = $session{scratch}{$namespace.".".$_[0]->get("wobjectId").".sort"} || "dateUploaded";
+	$sort = $session{scratch}{$namespace.".".$_[0]->get("wobjectId").".sort"} || "sequenceNumber";
 	$sortDirection = $session{scratch}{$namespace.".".$_[0]->get("wobjectId").".sortDirection"} || "desc";
 	$sql .= " order by $sort $sortDirection";
 	$p = WebGUI::Paginator->new($url,[],$numResults);