Merge 548b548 into bdd8ad9

.travis.yml

@@ -4,12 +4,14 @@ addons:
     packages:
       - aspell
       - aspell-en
+dist: trusty
 language: perl
 perl:
   - dev
   - "blead"
   - "blead-thr"
   - "5.30"
+  - "5.30-thr"
   - "5.28"
   - "5.28-thr"
   - "5.26"
@@ -39,28 +41,34 @@ matrix:
   allow_failures:
     - perl: blead
     - perl: blead-thr
+    - perl: dev
+    - perl: 5.12-thr # tarball 404s
+    - env: NO_JIGSAW=0
   fast_finish: 1
   include:
     - env: COVERAGE=1
-      perl: '5.28'
+      perl: "5.30"
+    - env: NO_JIGSAW=0
+      perl: "5.30"
 env:
   global:
     - AUTHOR_TESTING=1
     - AUTOMATED_TESTING=1
+    - NO_JIGSAW=1
     - RELEASE_TESTING=1
     - PERL_CPANM_OPT=--with-suggests
-    - SENDMAIL=/usr/sbin/sendmail  # fake, but needed for LWP::Protocol::mailto
+    - SENDMAIL=/usr/sbin/sendmail # fake, but needed for LWP::Protocol::mailto
 before_install:
   - git clone git://github.com/travis-perl/helpers ~/travis-perl-helpers
   - source ~/travis-perl-helpers/init
   - build-perl
   - perl -V
   - build-dist
-  - cd $BUILD_DIR             # $BUILD_DIR is set by the build-dist command
+  - cd $BUILD_DIR # $BUILD_DIR is set by the build-dist command
 install:
   - cpan-install Data::Dump Authen::NTLM Test::Spelling Test::Pod Test::Pod::Coverage Test::Version Test::EOL
-  - cpan-install --deps       # installs prereqs, including optional modules
-  - cpan-install --coverage   # installs converage prereqs, if enabled
+  - cpan-install --deps --update-prereqs # installs prereqs, including optional modules
+  - cpan-install --coverage # installs coverage prereqs, if enabled
 before_script:
   - coverage-setup
 script:

xt/author/live/jigsaw/auth-d.t

@@ -6,9 +6,8 @@ use Test::RequiresInternet ('jigsaw.w3.org' => 80);
 use HTTP::Request;
 use LWP::UserAgent;
 
-plan tests => 3;
-
 {
+
     package MyUA;
     use base 'LWP::UserAgent';
 
@@ -21,11 +20,18 @@ plan tests => 3;
     }
 }
 
-my $ua = MyUA->new(keep_alive => 1);
+SKIP: {
+    skip 'LIVE_JIGSAW_TESTS not enabled', 3 if $ENV{NO_JIGSAW};
+
+    my $ua = MyUA->new(keep_alive => 1);
 
-my $req = HTTP::Request->new(GET => "http://jigsaw.w3.org/HTTP/Digest/");
-my $res = $ua->request($req);
-isa_ok($res, 'HTTP::Response', 'request: Got a proper response');
+    my $req = HTTP::Request->new(GET => "http://jigsaw.w3.org/HTTP/Digest/");
+    my $res = $ua->request($req);
+
+    isa_ok($res, 'HTTP::Response', 'request: Got a proper response');
+
+    like($res->content, qr/Your browser made it!/, 'Proper response content');
+    is($res->header("Client-Response-Num"), 5, 'Client-Response-Num is 5');
+}
 
-like($res->content, qr/Your browser made it!/, 'Proper response content');
-is($res->header("Client-Response-Num"), 5, 'Client-Response-Num is 5');
+done_testing();