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 c66daba..0140d16 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Collections.pm
@@ -266,7 +266,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'}
         ];
     }