LP#740466 Sort report folders by name

Add order_by to Reporter.pm to sort report folders by name

Signed-off-by: Michael Peters <mrpeters@library.in.gov>
Signed-off-by: Dan Scott <dan@coffeecode.net>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
index 1cd1e2e..bab1450 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
@@ -68,7 +68,11 @@ sub retrieve_visible_folders {
        my $class = 'rrf';
        $class = 'rtf' if $type eq 'template';
        $class = 'rof' if $type eq 'output';
-       my $flesh = {flesh => 1,flesh_fields => { $class => ['owner', 'share_with']}};
+       my $flesh = {
+               flesh => 1,
+               flesh_fields => { $class => ['owner', 'share_with']}, 
+               order_by => { $class => 'name ASC'} 
+       };
 
        my $meth = "search_reporter_${type}_folder";
        my $fs = $e->$meth( [{ owner => $e->requestor->id }, $flesh] );