Merge r13509 from trunk: Order copy locations by name by default; useful for shelving...

git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_6@13538 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm
index a9d601b..9439aec 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/asset.pm
@@ -449,6 +449,7 @@ sub ranged_asset_copy_location {
                   FROM  $ctable c
                         JOIN $descendants d
                                 ON (d.id = c.owning_lib)
+                 ORDER BY name
        SQL
         
         my $sth = asset::copy_location->db_Main->prepare($sql);