X-Git-Url: http://git.ieval.ro/?p=webservice-tdwtf.git;a=blobdiff_plain;f=t%2FWebService-TDWTF.t;fp=t%2FWebService-TDWTF.t;h=17b8a117ab7b6611194bfa62774fb6861047d722;hp=74c95753aac4a9a0b1e8ec3dfba5738e8096e4d8;hb=47cb627d192b8c39f5be90cf874adec6bd9d2247;hpb=0911ac34e6ae2761f1b464817ce43d3a4e4ce14e

diff --git a/t/WebService-TDWTF.t b/t/WebService-TDWTF.t
index 74c9575..17b8a11 100644
--- a/t/WebService-TDWTF.t
+++ b/t/WebService-TDWTF.t
@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 use Test::RequiresInternet ('thedailywtf.com' => 80);
-use Test::More tests => 16;
+use Test::More tests => 15;
 BEGIN { use_ok('WebService::TDWTF') };
 
 my $art = tdwtf_article;
@@ -20,7 +20,7 @@ is @recent, 2, 'tdwtf_list_recent 2';
 
 my @dec15 = tdwtf_list_recent 2015, 12;
 is $dec15[0]->Title, 'Best of 2015: The A(nti)-Team', 'tdwtf_list_recent 2015, 12';
-is $dec15[0]->BodyHtml, '', '->BodyHtml';
+#is $dec15[0]->BodyHtml, '', '->BodyHtml';
 isnt $dec15[0]->Body, '', '->Body';
 isnt $dec15[0]->Body, '', '->Body (cached)';