From 5953eb3a878299d5401df679d899f87d14a054b4 Mon Sep 17 00:00:00 2001
From: Michael Peters <mrpeters@library.in.gov>
Date: Wed, 1 Jun 2011 08:52:57 -0400
Subject: [PATCH] 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>
---
 Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

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] );
-- 
2.11.0