@@ -, +, @@
syspref enabled
---
C4/HTML5Media.pm | 3 ++-
opac/opac-detail.pl | 4 ++++
2 files changed, 6 insertions(+), 1 deletion(-)
--- a/C4/HTML5Media.pm
+++ a/C4/HTML5Media.pm
@@ -23,7 +23,6 @@ use warnings;
use C4::Context;
use MARC::Field;
use Koha::Upload;
-use WWW::YouTube::Download qw(playback_url);
=head1 HTML5Media
@@ -101,6 +100,8 @@ sub gethtml5media {
$HTML5Media{srcblock} = $HTML5Media_field->subfield('u');
if (grep /youtube/, $HTML5Media_field->subfield('u') ) { # TODO is there an official YT URL shortener? Can we use that too?
if ($HTML5MediaYouTube == 1) {
+ require WWW::YouTube::Download;
+ import WWW::YouTube::Download qw(playback_url);
my $youtube = WWW::YouTube::Download->new;
$HTML5Media{srcblock} = $youtube->playback_url(
$HTML5Media_field->subfield('u'), {
--- a/opac/opac-detail.pl
+++ a/opac/opac-detail.pl
@@ -59,6 +59,10 @@ BEGIN {
require C4::External::BakerTaylor;
import C4::External::BakerTaylor qw(&image_url &link_url);
}
+# if ( C4::Context->preference("HTML5MediaYouTube" == 1) ) {
+# require WWW::YouTube::Download;
+# import WWW::YouTube::Download qw(playback_url);
+# }
}
my $query = new CGI;
--