@@ -, +, @@ ExternalContent --- Koha/ExternalContent/OverDrive.pm | 13 +++++++------ Koha/ExternalContent/RecordedBooks.pm | 3 --- 2 files changed, 7 insertions(+), 9 deletions(-) --- a/Koha/ExternalContent/OverDrive.pm +++ a/Koha/ExternalContent/OverDrive.pm @@ -25,8 +25,6 @@ use WebService::ILS::OverDrive::Patron; use C4::Context; use Koha::Logger; -use constant logger => Koha::Logger->get(); - =head1 NAME Koha::ExternalContent::OverDrive @@ -71,6 +69,9 @@ sub new { user_agent_params => { agent => $class->agent_string } ) ); } + + $self->{logger} = Koha::Logger->get(); + return $self; } @@ -180,13 +181,13 @@ use constant RETURN_PAGE_SESSION_KEY => "overdrive.return_page"; sub get_return_page_from_koha_session { my $self = shift; my $return_page = $self->get_from_koha_session(RETURN_PAGE_SESSION_KEY) || ""; - $self->logger->debug("get_return_page_from_koha_session: $return_page"); + $self->{logger}->debug("get_return_page_from_koha_session: $return_page"); return $return_page; } sub set_return_page_in_koha_session { my $self = shift; my $return_page = shift || ""; - $self->logger->debug("set_return_page_in_koha_session: $return_page"); + $self->{logger}->debug("set_return_page_in_koha_session: $return_page"); return $self->set_in_koha_session( RETURN_PAGE_SESSION_KEY, $return_page ); } @@ -196,14 +197,14 @@ sub get_token_from_koha_session { my $self = shift; my ($token, $token_type) = split $ACCESS_TOKEN_DELIMITER, $self->get_from_koha_session(ACCESS_TOKEN_SESSION_KEY) || ""; - $self->logger->debug("get_token_from_koha_session: ".($token || "(none)")); + $self->{logger}->debug("get_token_from_koha_session: ".($token || "(none)")); return ($token, $token_type); } sub set_token_in_koha_session { my $self = shift; my $token = shift || ""; my $token_type = shift || ""; - $self->logger->debug("set_token_in_koha_session: $token $token_type"); + $self->{logger}->debug("set_token_in_koha_session: $token $token_type"); return $self->set_in_koha_session( ACCESS_TOKEN_SESSION_KEY, join($ACCESS_TOKEN_DELIMITER, $token, $token_type) --- a/Koha/ExternalContent/RecordedBooks.pm +++ a/Koha/ExternalContent/RecordedBooks.pm @@ -24,9 +24,6 @@ use base qw(Koha::ExternalContent); use WebService::ILS::RecordedBooks::PartnerPatron; use WebService::ILS::RecordedBooks::Partner; use C4::Context; -use Koha::Logger; - -use constant logger => Koha::Logger->get(); __PACKAGE__->mk_accessors(qw(domain is_identified)); --