From fe6be64c499584ef631b2c47098fdae57c8ed3e9 Mon Sep 17 00:00:00 2001 From: miker Date: Tue, 22 Aug 2006 15:34:08 +0000 Subject: [PATCH] order_by update git-svn-id: svn://svn.open-ils.org/ILS/trunk@5640 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) diff --git a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm index 51085055cf..81daf3b02f 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/SuperCat.pm @@ -497,12 +497,11 @@ sub recent_changes { my $_storage = OpenSRF::AppSession->create( 'open-ils.cstore' ); - return $_storage - ->request( - "open-ils.cstore.direct.$type.record_entry.id_list.atomic", - { $axis => { ">" => $when }, id => { '>' => 0 } }, - { order_by => "$axis desc", limit => $limit } ) - ->gather(1); + return $_storage->request( + "open-ils.cstore.direct.$type.record_entry.id_list.atomic", + { $axis => { ">" => $when }, id => { '>' => 0 } }, + { order_by => { bre => "$axis desc" }, limit => $limit } + )->gather(1); } for my $t ( qw/biblio authority/ ) { @@ -519,7 +518,7 @@ for my $t ( qw/biblio authority/ ) { [ { name => 'when', desc => "Date to start looking for ${a}ed records", - default => 'today', + default => '1-01-01', type => 'string' }, { name => 'limit', -- 2.11.0