[SCM] Debian packaging of get-flash-videos branch, master, updated. debian/1.25.git2012.06.27-1-1-g0833ff1
intrigeri
intrigeri at boum.org
Wed Oct 24 17:42:45 UTC 2012
The following commit has been merged in the master branch:
commit 0833ff12b988122e1eb16fceb3f66656045ac1b8
Author: intrigeri <intrigeri at boum.org>
Date: Wed Oct 24 19:18:48 2012 +0200
Import upstream patch to fix Youtube videos (Closes: #690541).
This was upstream patch 95be0e51df6b13dea87fe0d8b1083d98241e11c8.
diff --git a/debian/patches/series b/debian/patches/series
index e4acde9..21a6988 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,3 +1,4 @@
fix_redirect.diff
00_fix_manpage_warning.diff
use_libcrypt-blowfish-perl.diff
+updated-Youtube.pm-to-fix-breakage-with-introduction.diff
diff --git a/debian/patches/updated-Youtube.pm-to-fix-breakage-with-introduction.diff b/debian/patches/updated-Youtube.pm-to-fix-breakage-with-introduction.diff
new file mode 100644
index 0000000..fc37d4a
--- /dev/null
+++ b/debian/patches/updated-Youtube.pm-to-fix-breakage-with-introduction.diff
@@ -0,0 +1,45 @@
+From: Kevin Skusek <nightkev at gmail.com>
+Date: Fri, 28 Sep 2012 01:15:34 -0700
+Subject: updated Youtube.pm to fix breakage with introduction of new
+ signature url parameter
+
+---
+ lib/FlashVideo/Site/Youtube.pm | 8 +++++---
+ 1 file changed, 5 insertions(+), 3 deletions(-)
+
+diff --git a/lib/FlashVideo/Site/Youtube.pm b/lib/FlashVideo/Site/Youtube.pm
+index 70e4994..ce46ab6 100644
+--- a/lib/FlashVideo/Site/Youtube.pm
++++ b/lib/FlashVideo/Site/Youtube.pm
+@@ -62,8 +62,7 @@ sub find_video {
+ my $video_id;
+ if ($browser->content =~ /(?:var pageVideoId =|(?:CFG_)?VIDEO_ID'?\s*:)\s*'(.+?)'/
+ || $browser->content =~ /"video_id": "([^"]+)"/
+- || $embed_url =~ /v=([^&]+)/
+- || $browser->content =~ /&video_id=([^&]+)&/) {
++ || $embed_url =~ /v=([^&]+)/) {
+ $video_id = $1;
+ } else {
+ check_die($browser, "Couldn't extract video ID");
+@@ -178,6 +177,7 @@ sub parse_youtube_url_encoded_fmt_stream_map {
+
+ my $format = "";
+ my $url = "";
++ my $signature = "";
+
+ foreach my $pair (split /&/, $params) {
+ my ($name, $value) = split /=/, $pair;
+@@ -185,10 +185,12 @@ sub parse_youtube_url_encoded_fmt_stream_map {
+ $format = $value;
+ } elsif ($name eq "url") {
+ $url = uri_unescape($value);
++ } elsif ($name eq "sig") {
++ $signature = $value;
+ }
+ }
+
+- $map->{$format} = $url;
++ $map->{$format} = $url."&signature=".$signature;
+ }
+
+ return $map;
--
Debian packaging of get-flash-videos
More information about the Pkg-perl-cvs-commits
mailing list