[SCM] Video extraction utility for YouTube, Google Video and other video sites (Debian packaging) branch, master, updated. upstream/2.1.7-214-g6762190
legatvs
legatvs at gmail.com
Wed Apr 1 14:44:45 UTC 2009
The following commit has been merged in the master branch:
commit 67bad41206b8a602f8cabf28699461a2ca0d6686
Author: legatvs <legatvs at gmail.com>
Date: Thu Feb 5 15:06:40 2009 +0200
Fixed sevenload support.
diff --git a/CHANGES b/CHANGES
index 7b527b3..196d22d 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,5 +1,8 @@
Version 2.1.5
+ User-visible changes:
+ * Fixed sevenload support
+
Version 2.1.4
(February 1, 2009)
diff --git a/clive b/clive
index 656c674..ecb1b31 100755
--- a/clive
+++ b/clive
@@ -1264,8 +1264,9 @@ sub fetch_sevenload_configxml {
my $xml = XMLin($conf_xml);
#use Data::Dumper; print Dumper($xml);
$title = $xml->{playlists}{playlist}{items}{item}{title};
- $id = $xml->{playlists}{playlist}{items}{item}{id}; # Monstrous.
- $xurl = $xml->{playlists}{playlist}{items}{item}{videos}{video}{url};
+ $id = $xml->{playlists}{playlist}{items}{item}{id};
+ $xurl = $xml->{playlists}{playlist}{items}{item} # Monstrous.
+ {videos}{video}{streams}{stream}{locations}{location}{content};
} else {
print STDERR "\nerror: " . $curl->strerror($rc) . " (http/$rc)\n";
}
--
Video extraction utility for YouTube, Google Video and other video sites (Debian packaging)
More information about the Pkg-perl-cvs-commits
mailing list