From ea23644278cb37f5b45414304aeba7caaa21929b Mon Sep 17 00:00:00 2001 From: JT Smith Date: Sun, 26 May 2002 03:31:23 +0000 Subject: [PATCH] Changed so that new additions are added to the top of the list. --- lib/WebGUI/Wobject/DownloadManager.pm | 6 +++--- lib/WebGUI/Wobject/LinkList.pm | 5 ++--- 2 files changed, 5 insertions(+), 6 deletions(-) diff --git a/lib/WebGUI/Wobject/DownloadManager.pm b/lib/WebGUI/Wobject/DownloadManager.pm index afbb7b68c..a9d830bdb 100644 --- a/lib/WebGUI/Wobject/DownloadManager.pm +++ b/lib/WebGUI/Wobject/DownloadManager.pm @@ -278,13 +278,13 @@ sub www_editDownload { #------------------------------------------------------------------- sub www_editDownloadSave { - my ($file, $alt1, $alt2, $sqlAdd, $seq); + my ($file, $alt1, $alt2, $sqlAdd); if (WebGUI::Privilege::canEditPage()) { if ($session{form}{did} eq "new") { $session{form}{did} = getNextId("downloadId"); - ($seq) = WebGUI::SQL->quickArray("select max(sequenceNumber) from DownloadManager_file where wobjectId=".$_[0]->get("wobjectId")); WebGUI::SQL->write("insert into DownloadManager_file (wobjectId,downloadId,sequenceNumber) - values (".$_[0]->get("wobjectId").",$session{form}{did},".($seq+1).")"); + values (".$_[0]->get("wobjectId").",$session{form}{did},-1)"); + _reorderDownloads($_[0]->get("wobjectId")); } $file = WebGUI::Attachment->new("",$session{form}{wid},$session{form}{did}); $file->save("downloadFile"); diff --git a/lib/WebGUI/Wobject/LinkList.pm b/lib/WebGUI/Wobject/LinkList.pm index 47374a05a..0620b181f 100644 --- a/lib/WebGUI/Wobject/LinkList.pm +++ b/lib/WebGUI/Wobject/LinkList.pm @@ -192,13 +192,12 @@ sub www_editLink { #------------------------------------------------------------------- sub www_editLinkSave { - my ($seq); if (WebGUI::Privilege::canEditPage()) { if ($session{form}{lid} eq "new") { - ($seq) = WebGUI::SQL->quickArray("select max(sequenceNumber) from LinkList_link where wobjectId=".$_[0]->get("wobjectId")); $session{form}{lid} = getNextId("linkId"); WebGUI::SQL->write("insert into LinkList_link (wobjectId,linkId,sequenceNumber) values (".$_[0]->get("wobjectId") - .",$session{form}{lid},".($seq+1).")"); + .",$session{form}{lid},-1)"); + _reorderLinks($_[0]->get("wobjectId")); } WebGUI::SQL->write("update LinkList_link set name=".quote($session{form}{name}).", url=".quote($session{form}{url}).",description=".quote($session{form}{description}).",