From b1dc5092d82fd0952ce4e9b586842f5ccb7a4377 Mon Sep 17 00:00:00 2001 From: Nick Clemens Date: Wed, 31 Aug 2016 17:37:56 +0000 Subject: [PATCH] Bug 17231 - HTML5MediaYouTube should recognize youtu.be links from youtube as well at the full links To test: Enable HTML5MediaYouTube and ensure WWW::YouTube::Download is installed Add an 856$u to a record like: https://www.youtube.com/watch?v=tu0qtEwb9gE Verify you can see the embedded player Use the youtube shortened like (from the share button) like: https://youtu.be/tu0qtEwb9gE Verify you can see the embedded player Signed-off-by: Claire Gravely Signed-off-by: Jonathan Druart Signed-off-by: Kyle M Hall --- C4/HTML5Media.pm | 18 ++++++++++-------- 1 file changed, 10 insertions(+), 8 deletions(-) diff --git a/C4/HTML5Media.pm b/C4/HTML5Media.pm index b4389332a7..462f6b4183 100644 --- a/C4/HTML5Media.pm +++ b/C4/HTML5Media.pm @@ -98,18 +98,20 @@ sub gethtml5media { # src if ( $HTML5Media_field->subfield('u') ) { $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 (grep /youtube|youtu[.]be/, $HTML5Media_field->subfield('u') ) { 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'), { - 'fmt' => '43' #webm is the only format compatible to all modern browsers. maybe check for available qualities - } - ); - # TODO handle error if format not available. Does that ever occur? - $isyoutube = 1; + eval { + $HTML5Media{srcblock} = $youtube->playback_url( + $HTML5Media_field->subfield('u'), { + 'fmt' => '43' #webm is the only format compatible to all modern browsers. maybe check for available qualities + } + ); + }; + if ($@) { warn $@; } + else { $isyoutube = 1;} } else { next; # do not embed youtube videos -- 2.39.5