Teach Current Reporter to Ignore Simple Reporter Folders

Sponsored-by: C/W MARS
Sponsored-by: Missouri Evergreen Consortium
Signed-off-by: Jason Boyer <JBoyer@equinoxOLI.org>

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
index 81964ab..e8439b6 100644 (file)
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Reporter.pm
@@ -80,7 +80,7 @@ sub retrieve_visible_folders {
     };
 
     my $meth = "search_reporter_${type}_folder";
-    my $fs = $e->$meth( [{ owner => $e->requestor->id }, $flesh] );
+    my $fs = $e->$meth( [{ owner => $e->requestor->id, simple_reporter => 'f' }, $flesh] );
 
     my @orgs;
     my $o = $U->storagereq(