@@ -, +, @@ --- C4/Installer/PerlDependencies.pm | 4 ++-- Koha/XSLT_Handler.pm | 13 ++++++++++++- 2 files changed, 14 insertions(+), 3 deletions(-) --- a/C4/Installer/PerlDependencies.pm +++ a/C4/Installer/PerlDependencies.pm @@ -738,8 +738,8 @@ our $PERL_DEPS = { 'min_ver' => '0.91', }, 'LWP::Protocol::https' => { - 'usage' => 'OverDrive integration', - 'required' => '0', + 'usage' => 'Core', + 'required' => '1', 'min_ver' => '5.836', }, }; --- a/Koha/XSLT_Handler.pm +++ a/Koha/XSLT_Handler.pm @@ -311,7 +311,18 @@ sub _load { sub _load_xml_args { my $self = shift; - return $_[1]? { 'string' => $_[1]//'' }: { 'location' => $_[0]//'' }; + my $https_code = $self->_https_workaround(@_); + return $https_code || $_[1]? + { 'string' => $https_code // $_[1] }: { 'location' => $_[0]//'' }; +} + +sub _https_workaround { # Routine added for bug 12758 (part 1) + my ( $self, $file, $code ) = @_; + return if $file!~/^https/i; + require LWP::UserAgent; + my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 } ); + my $resp = $ua->get( $file ); + return $resp->decoded_content if $resp->is_success; #undef otherwise } # _set_error --