From ec569fdd6ac5f9f362c6253ea3371f8aab9f1de4 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Mon, 12 Mar 2007 03:06:47 +0000 Subject: [PATCH] make getRevision return revisions in order or revisionDate --- docs/changelog/7.x.x.txt | 1 + lib/WebGUI/AssetVersioning.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index 0e07db4ef..e8396622b 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -38,6 +38,7 @@ Veradox) - Fully remove i18n precaching to free up memory (thanks to Matthew Wilson, Veradox) + - Wiki page revisions were not in order (perlDreamer Consulting, LLC) 7.3.11 - Added an option for enabling coverage tests to testCodebase.pl. diff --git a/lib/WebGUI/AssetVersioning.pm b/lib/WebGUI/AssetVersioning.pm index d682918ab..4c18a67f3 100644 --- a/lib/WebGUI/AssetVersioning.pm +++ b/lib/WebGUI/AssetVersioning.pm @@ -217,7 +217,7 @@ sub getRevisions { $statusClause = " and status=".$self->session->db->quote($status); } my @revisions = (); - my $rs = $self->session->db->read("select revisionDate from assetData where assetId=".$self->session->db->quote($self->getId).$statusClause); + my $rs = $self->session->db->read("select revisionDate from assetData where assetId=".$self->session->db->quote($self->getId).$statusClause. " order by revisionDate desc"); while (my ($version) = $rs->array) { push(@revisions, WebGUI::Asset->new($self->session, $self->getId, $self->get("className"), $version)); }