cpack_repository/commit

date sort most recent first

authorJacco van Ossenbruggen
Fri Apr 18 11:41:59 2014 +0200
committerJacco van Ossenbruggen
Fri Apr 18 11:41:59 2014 +0200
commitf43dd888a39fffdb527529ffadc077e26ffec80b
tree572ce359970bbc2cb3e979c948ba27b6b0ff14f5
parent27f1abcba7701f73dbcbb76ce58d649ee0a91a0b
Diff style: patch stat
diff --git a/components/cpack.pl b/components/cpack.pl
index 617dc4e..7edf47c 100644
--- a/components/cpack.pl
+++ b/components/cpack.pl
@@ -135,7 +135,11 @@ package_row(Package, _Options) -->
 sort_packages(Key, Packs, Sorted) :-
 	map_list_to_pairs(cpack_sort_key(Key), Packs, Keyed),
 	keysort(Keyed, KeySorted),
-	pairs_values(KeySorted, Sorted).
+	pairs_values(KeySorted, Sorted0),
+	(   Key == date % sort on date by most recent first
+	->  reverse(Sorted0, Sorted)
+	;   Sorted = Sorted0
+	).
 
 %%	cpack_sort_key(+KeyName, +CPACK, -KeyValue) is det.
 %