Return authority records for freshmeat when authority records are requested

Previously, freshmeat was hardcoded to return bibliographic records, even
when authority records were requested.

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

diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
index 305b8a2..3173a34 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
@@ -997,7 +997,11 @@ sub changes_feed {
        #       return 302;
        #}
 
-       my $feed = create_record_feed( 'record', $type, $list, $unapi, $org_unit->[0]->shortname, undef, $flesh_feed);
+       my $search = 'record';
+       if ($rtype = 'authority') {
+               $search = 'authority';
+       }
+       my $feed = create_record_feed( $search, $type, $list, $unapi, $org_unit->[0]->shortname, undef, $flesh_feed);
        $feed->root($root);
 
        if ($date) {