From: Michael Peters <mrpeters@library.in.gov>
Date: Wed, 1 Jun 2011 12:52:57 +0000 (-0400)
Subject: LP#740466 add order by name method to Reporter.pm to sort report folders by name... 
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=5953eb3a878299d5401df679d899f87d14a054b4;p=evergreen%2Fpines.git

LP#740466 add order by name method 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 1cd1e2ee72..bab1450d97 100644
--- 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] );