Add explicit sort to collections API with limit

Add an explicit ORDER BY au.id ASC when limiting collections API
calls. This ensures that the same users will be returned on
subsequent calls, assuming no other relevant changes in the data.

Signed-off-by: Jeff Godin <jgodin@tadl.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
index 64f302f..69fc472 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
@@ -252,7 +252,8 @@ sub users_of_interest_warning_penalty {
         $query->{limit} = $limit;
         my $sort_order = $sort || "DESC";
         $query->{order_by} = [
-            {class => 'ausp', field => 'set_date', direction => $sort_order}
+            {class => 'ausp', field => 'set_date', direction => $sort_order},
+            {class => 'au', field => 'id', direction => 'ASC'}
         ];
     }