Lines 33-38
use C4::Output;
Link Here
|
33 |
use C4::Charset qw(StripNonXmlChars); |
33 |
use C4::Charset qw(StripNonXmlChars); |
34 |
|
34 |
|
35 |
my $query = new CGI; |
35 |
my $query = new CGI; |
|
|
36 |
|
37 |
# if opacreadinghistory is disabled, leave immediately |
38 |
if ( ! C4::Context->preference('opacreadinghistory') ) { |
39 |
print $query->redirect("/cgi-bin/koha/errors/404.pl"); |
40 |
exit; |
41 |
} |
42 |
|
36 |
my ( $template, $borrowernumber, $cookie ) = get_template_and_user( |
43 |
my ( $template, $borrowernumber, $cookie ) = get_template_and_user( |
37 |
{ |
44 |
{ |
38 |
template_name => "opac-readingrecord.tt", |
45 |
template_name => "opac-readingrecord.tt", |
39 |
- |
|
|