Kyle M Hall
432deab9ed
This patch makes the following changes: 1) If there is no logged in patron, the RSS link states it is for system-wide news. 2) If a patron is logged in, the RSS link states it is for system-wide news *and* news for the patron's home library. 3) The patron's home branch code is embedded in the RSS feed url so he or she no longer needs to be logged in for us to know what branch's news to pull. Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
55 lines
1.8 KiB
Perl
Executable file
55 lines
1.8 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
# This file is part of Koha.
|
|
#
|
|
# Copyright (C) 2015 Viktor Sarge
|
|
#
|
|
# Koha is free software; you can redistribute it and/or modify it
|
|
# under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# Koha is distributed in the hope that it will be useful, but
|
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with Koha; if not, see <http://www.gnu.org/licenses>.
|
|
|
|
|
|
use Modern::Perl;
|
|
use CGI;
|
|
use C4::Auth; # get_template_and_user
|
|
use C4::Output;
|
|
use C4::NewsChannels; # GetNewsToDisplay
|
|
use C4::Languages qw(getTranslatedLanguages accept_language);
|
|
|
|
my $input = new CGI;
|
|
my $dbh = C4::Context->dbh;
|
|
|
|
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
|
|
{
|
|
template_name => "opac-news-rss.tt",
|
|
type => "opac",
|
|
query => $input,
|
|
authnotrequired => ( C4::Context->preference("OpacPublic") ? 1 : 0 ),
|
|
flagsrequired => { borrow => 1 },
|
|
}
|
|
);
|
|
|
|
# Get the news to display
|
|
# use cookie setting for language, bug default to syspref if it's not set
|
|
my ($theme, $news_lang, $availablethemes) = C4::Templates::themelanguage(C4::Context->config('opachtdocs'),'opac-main.tt','opac',$input);
|
|
|
|
my $branchcode = $input->param('branchcode');
|
|
|
|
my $all_koha_news = GetNewsToDisplay( $news_lang, $branchcode );
|
|
my $koha_news_count = scalar @$all_koha_news;
|
|
|
|
$template->param(
|
|
koha_news => $all_koha_news,
|
|
koha_news_count => $koha_news_count,
|
|
);
|
|
|
|
output_html_with_http_headers $input, $cookie, $template->output;
|