# 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, write to the Free Software Foundation, Inc., 59 Temple Place,
-# Suite 330, Boston, MA 02111-1307 USA
+# You should have received a copy of the GNU General Public License along
+# with Koha; if not, write to the Free Software Foundation, Inc.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
use strict;
use warnings;
use C4::Circulation;
use C4::Review;
use C4::Biblio;
-use C4::Dates qw/format_date/;
+use C4::Dates;
use C4::Members qw/GetMemberDetails/;
use POSIX qw(ceil strftime);
);
}
+my $libravatar_enabled = 0;
+if ( C4::Context->preference('ShowReviewer') and C4::Context->preference('ShowReviewerPhoto')) {
+ eval {
+ require Libravatar::URL;
+ Libravatar::URL->import();
+ };
+ if ( !$@ ) {
+ $libravatar_enabled = 1;
+ }
+}
+
my $reviews = getallreviews(1,$offset,$results_per_page);
my $marcflavour = C4::Context->preference("marcflavour");
-my $hits = numberofreviews();
+my $hits = numberofreviews(1);
my $i = 0;
my $latest_comment_date;
for my $result (@$reviews){
$result->{size} = $bib->{'size'};
$result->{notes} = $bib->{'notes'};
$result->{timestamp} = $bib->{'timestamp'};
+ $result->{borrtitle} = $borr->{'title'};
$result->{firstname} = $borr->{'firstname'};
$result->{surname} = $borr->{'surname'};
+ $result->{userid} = $borr->{'userid'};
+ if ($libravatar_enabled and $borr->{'email'}) {
+ $result->{avatarurl} = libravatar_url(email => $borr->{'email'}, size => 40, https => $ENV{HTTPS});
+ }
+
if ($result->{borrowernumber} eq $borrowernumber) {
$result->{your_comment} = 1;
}
my $rsstimestamp = C4::Dates->new($result->{datereviewed},"iso");
my $rsstimestamp_output = $rsstimestamp->output("rfc822");
$result->{timestamp} = $rsstimestamp_output;
- $result->{datereviewed} = format_date($result->{datereviewed});
- } else {
- $result->{datereviewed} = format_date($result->{datereviewed});
}
}
## Build the page numbers on the bottom of the page
# the page number for this page
my $this_page_number = $i;
# it should only be highlighted if it's the current page
- my $highlight = 1 if ($this_page_number == $current_page_number);
+ my $highlight;
+ $highlight = 1 if ($this_page_number == $current_page_number);
# put it in the array
push @page_numbers, { offset => $this_offset, pg => $this_page_number, highlight => $highlight };
for ($i=$current_page_number; $i<=($current_page_number + 20 );$i++) {
my $this_offset = ((($i-9)*$results_per_page)-$results_per_page);
my $this_page_number = $i-9;
- my $highlight = 1 if ($this_page_number == $current_page_number);
+ my $highlight;
+ $highlight = 1 if ($this_page_number == $current_page_number);
if ($this_page_number <= $pages) {
push @page_numbers, { offset => $this_offset, pg => $this_page_number, highlight => $highlight };
}