From 57722d10af7b2555f4a5bcd6364073c145c19098 Mon Sep 17 00:00:00 2001
From: Toni Gundogdu <legatvs@gmail.com>
Date: Mon, 1 Oct 2012 08:14:30 +0300
Subject: [PATCH] expire.t: Skip all tests

Both pluzz.lua and arte.lua need to be fixed now.
---
 tests/t/expire.t | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/tests/t/expire.t b/tests/t/expire.t
index c3e2fee..e4c24f6 100644
--- a/tests/t/expire.t
+++ b/tests/t/expire.t
@@ -27,6 +27,7 @@ plan skip_all => "LWP::UserAgent required for testing" if $@;
 use Test::Quvi;
 
 my $q = Test::Quvi->new;
+plan skip_all => "FIXME"; # Both website/{arte,pluzz}.lua need to be fixed.
 plan skip_all => "TEST_SKIP rule" if $q->test_skip("expire");
 
 my $ua = new LWP::UserAgent;
@@ -38,8 +39,6 @@ my %h = (
     my ($page) = @_;
     "http://videos.arte.tv/$1/videos/$2" if $page =~ /$qr/;
   },
-);
-=for comment FIXME: pluzz.lua
   "http://www.pluzz.fr/" => sub {
     my ($page, $url) = @_;
     my $rx_href = qr|class=""\s+href="(.*?)"|i;
@@ -49,7 +48,7 @@ my %h = (
       return $c if $c =~ /$rx_url/;
     }
   }
-=cut
+);
 
 plan tests => scalar(keys %h) * 2;
 
-- 
2.11.4.GIT