r73300 - in /trunk/libwww-youtube-download-perl: Changes MANIFEST META.yml debian/changelog inc/Test/More.pm lib/WWW/YouTube/Download.pm
gregoa at users.alioth.debian.org
gregoa at users.alioth.debian.org
Sat Apr 23 18:34:33 UTC 2011
Author: gregoa
Date: Sat Apr 23 18:34:22 2011
New Revision: 73300
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=73300
Log:
* New upstream release 0.26.
Modified:
trunk/libwww-youtube-download-perl/Changes
trunk/libwww-youtube-download-perl/MANIFEST
trunk/libwww-youtube-download-perl/META.yml
trunk/libwww-youtube-download-perl/debian/changelog
trunk/libwww-youtube-download-perl/inc/Test/More.pm
trunk/libwww-youtube-download-perl/lib/WWW/YouTube/Download.pm
Modified: trunk/libwww-youtube-download-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/Changes?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/Changes (original)
+++ trunk/libwww-youtube-download-perl/Changes Sat Apr 23 18:34:22 2011
@@ -1,4 +1,7 @@
Revision history for Perl extension WWW::YouTube::Download
+
+0.26 Wed Apr 20 01:34:55 2011
+ - fixed scrape problem (reported by Octavian++)
0.25 Sat Mar 19 00:39:41 2011
- added few more match URLs (mikolaj++)
Modified: trunk/libwww-youtube-download-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/MANIFEST?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/MANIFEST (original)
+++ trunk/libwww-youtube-download-perl/MANIFEST Sat Apr 23 18:34:22 2011
@@ -15,7 +15,7 @@
inc/Test/More.pm
lib/WWW/YouTube/Download.pm
Makefile.PL
-MANIFEST This list of files
+MANIFEST
META.yml
README
t/00_compile.t
Modified: trunk/libwww-youtube-download-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/META.yml?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/META.yml (original)
+++ trunk/libwww-youtube-download-perl/META.yml Sat Apr 23 18:34:22 2011
@@ -26,5 +26,5 @@
perl: 5.8.1
resources:
license: http://dev.perl.org/licenses/
- repository: git://github.com/xaicron/p5-www-youtube-download.git
-version: 0.25
+ repository: git://github.com/xaicron/p5-www-youtube-download
+version: 0.26
Modified: trunk/libwww-youtube-download-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/debian/changelog?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/debian/changelog (original)
+++ trunk/libwww-youtube-download-perl/debian/changelog Sat Apr 23 18:34:22 2011
@@ -1,15 +1,17 @@
-libwww-youtube-download-perl (0.25-1) UNRELEASED; urgency=low
+libwww-youtube-download-perl (0.26-1) UNRELEASED; urgency=low
- NOTE: we need to ask upstream for a copyright statement
-
- * New upstream release
+ [ Jonathan Yu ]
+ * New upstream release 0.25
* No longer install README (no useful information here)
* Bump debhelper compat to 8
* Rewrite control description
* Add myself to Uploaders and Copyright
* Refresh copyright information
- -- Jonathan Yu <jawnsy at cpan.org> Fri, 18 Mar 2011 21:35:49 -0400
+ [ gregor herrmann ]
+ * New upstream release 0.26.
+
+ -- gregor herrmann <gregoa at debian.org> Sat, 23 Apr 2011 20:32:12 +0200
libwww-youtube-download-perl (0.22-1) unstable; urgency=low
Modified: trunk/libwww-youtube-download-perl/inc/Test/More.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/inc/Test/More.pm?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/inc/Test/More.pm (original)
+++ trunk/libwww-youtube-download-perl/inc/Test/More.pm Sat Apr 23 18:34:22 2011
@@ -18,7 +18,7 @@
return warn @_, " at $file line $line\n";
}
-our $VERSION = '0.96';
+our $VERSION = '0.98';
$VERSION = eval $VERSION; ## no critic (BuiltinFunctions::ProhibitStringyEval)
use Test::Builder::Module;
@@ -88,7 +88,7 @@
return $tb->ok( $test, $name );
}
-#line 367
+#line 372
sub is ($$;$) {
my $tb = Test::More->builder;
@@ -104,7 +104,7 @@
*isn't = \&isnt;
-#line 411
+#line 416
sub like ($$;$) {
my $tb = Test::More->builder;
@@ -112,7 +112,7 @@
return $tb->like(@_);
}
-#line 426
+#line 431
sub unlike ($$;$) {
my $tb = Test::More->builder;
@@ -120,7 +120,7 @@
return $tb->unlike(@_);
}
-#line 471
+#line 476
sub cmp_ok($$$;$) {
my $tb = Test::More->builder;
@@ -128,7 +128,7 @@
return $tb->cmp_ok(@_);
}
-#line 506
+#line 511
sub can_ok ($@) {
my( $proto, @methods ) = @_;
@@ -162,7 +162,7 @@
return $ok;
}
-#line 572
+#line 577
sub isa_ok ($$;$) {
my( $object, $class, $obj_name ) = @_;
@@ -222,7 +222,7 @@
return $ok;
}
-#line 651
+#line 656
sub new_ok {
my $tb = Test::More->builder;
@@ -247,16 +247,16 @@
return $obj;
}
-#line 736
-
-sub subtest($&) {
+#line 741
+
+sub subtest {
my ($name, $subtests) = @_;
my $tb = Test::More->builder;
return $tb->subtest(@_);
}
-#line 760
+#line 765
sub pass (;$) {
my $tb = Test::More->builder;
@@ -270,7 +270,7 @@
return $tb->ok( 0, @_ );
}
-#line 823
+#line 833
sub use_ok ($;@) {
my( $module, @imports ) = @_;
@@ -332,7 +332,7 @@
return( $eval_result, $eval_error );
}
-#line 892
+#line 902
sub require_ok ($) {
my($module) = shift;
@@ -376,7 +376,7 @@
return $module =~ /^[a-zA-Z]\w*$/ ? 1 : 0;
}
-#line 969
+#line 979
our( @Data_Stack, %Refs_Seen );
my $DNE = bless [], 'Does::Not::Exist';
@@ -483,7 +483,7 @@
return '';
}
-#line 1129
+#line 1139
sub diag {
return Test::More->builder->diag(@_);
@@ -493,13 +493,13 @@
return Test::More->builder->note(@_);
}
-#line 1155
+#line 1165
sub explain {
return Test::More->builder->explain(@_);
}
-#line 1221
+#line 1231
## no critic (Subroutines::RequireFinalReturn)
sub skip {
@@ -527,7 +527,7 @@
last SKIP;
}
-#line 1305
+#line 1315
sub todo_skip {
my( $why, $how_many ) = @_;
@@ -548,7 +548,7 @@
last TODO;
}
-#line 1360
+#line 1370
sub BAIL_OUT {
my $reason = shift;
@@ -557,7 +557,7 @@
$tb->BAIL_OUT($reason);
}
-#line 1399
+#line 1409
#'#
sub eq_array {
@@ -697,7 +697,7 @@
}
}
-#line 1546
+#line 1556
sub eq_hash {
local @Data_Stack = ();
@@ -732,7 +732,7 @@
return $ok;
}
-#line 1605
+#line 1615
sub eq_set {
my( $a1, $a2 ) = @_;
@@ -757,6 +757,6 @@
);
}
-#line 1807
+#line 1817
1;
Modified: trunk/libwww-youtube-download-perl/lib/WWW/YouTube/Download.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libwww-youtube-download-perl/lib/WWW/YouTube/Download.pm?rev=73300&op=diff
==============================================================================
--- trunk/libwww-youtube-download-perl/lib/WWW/YouTube/Download.pm (original)
+++ trunk/libwww-youtube-download-perl/lib/WWW/YouTube/Download.pm Sat Apr 23 18:34:22 2011
@@ -4,7 +4,7 @@
use warnings;
use 5.008001;
-our $VERSION = '0.25';
+our $VERSION = '0.26';
use Carp ();
use URI ();
@@ -167,7 +167,7 @@
my $data;
for (split "\n", $content) {
- if ($_ && /var\s+swfConfig/ && /videoplayback/ && /signature/ && !/HTML/) {
+ if ($_ && /var\s+swfConfig\s+=/) {
my ($json) = $_ =~ /^[^{]+(.*)[^}]+$/;
$data = JSON->new->utf8(1)->decode($json);
last;
More information about the Pkg-perl-cvs-commits
mailing list