Changes

 Summary of important user-visible changes for Bio-DB-SwissProt
 --------------------------------------------------------------
 
+1.7.4     2019-12-07 16:07:46-06:00 America/Chicago
+  * Fixes for issues related to using Bio::Root::Test (issue #3) 
+
 1.7.3     2019-11-27 18:56:08-06:00 America/Chicago
   * First release after split from bioperl-live.

META.json

@@ -39,12 +39,14 @@
       },
       "test" : {
          "requires" : {
-            "Bio::Root::Test" : "0",
             "File::Spec" : "0",
             "IO::Handle" : "0",
             "IPC::Open3" : "0",
             "Test::More" : "0",
+            "Test::Needs" : "0",
+            "Test::RequiresInternet" : "0",
             "perl" : "5.006",
+            "utf8" : "0",
             "warnings" : "0"
          }
       }
@@ -62,7 +64,7 @@
          "web" : "https://github.com/bioperl/bio-db-swissprot"
       }
    },
-   "version" : "1.7.3",
+   "version" : "1.7.4",
    "x_Dist_Zilla" : {
       "perl" : {
          "version" : "5.028001"
@@ -298,7 +300,7 @@
                   "branch" : null,
                   "changelog" : "Changes",
                   "signed" : 0,
-                  "tag" : "Bio-DB-SwissProt-v1.7.3",
+                  "tag" : "Bio-DB-SwissProt-v1.7.4",
                   "tag_format" : "%N-v%v",
                   "tag_message" : "%N-v%v"
                },

META.yml

@@ -3,12 +3,14 @@ abstract: 'Database object interface to SwissProt retrieval'
 author:
   - 'Jason Stajich <jason@bioperl.org>'
 build_requires:
-  Bio::Root::Test: '0'
   File::Spec: '0'
   IO::Handle: '0'
   IPC::Open3: '0'
   Test::More: '0'
+  Test::Needs: '0'
+  Test::RequiresInternet: '0'
   perl: '5.006'
+  utf8: '0'
   warnings: '0'
 configure_requires:
   ExtUtils::MakeMaker: '0'
@@ -28,7 +30,7 @@ resources:
   bugtracker: https://github.com/bioperl/bio-db-swissprot/issues
   homepage: https://metacpan.org/release/Bio-DB-SwissProt
   repository: git://github.com/bioperl/bio-db-swissprot.git
-version: 1.7.3
+version: 1.7.4
 x_Dist_Zilla:
   perl:
     version: '5.028001'
@@ -213,7 +215,7 @@ x_Dist_Zilla:
           branch: ~
           changelog: Changes
           signed: 0
-          tag: Bio-DB-SwissProt-v1.7.3
+          tag: Bio-DB-SwissProt-v1.7.4
           tag_format: '%N-v%v'
           tag_message: '%N-v%v'
         Dist::Zilla::Role::Git::Repo:

Makefile.PL

@@ -23,14 +23,16 @@ my %WriteMakefileArgs = (
     "strict" => 0
   },
   "TEST_REQUIRES" => {
-    "Bio::Root::Test" => 0,
     "File::Spec" => 0,
     "IO::Handle" => 0,
     "IPC::Open3" => 0,
     "Test::More" => 0,
+    "Test::Needs" => 0,
+    "Test::RequiresInternet" => 0,
+    "utf8" => 0,
     "warnings" => 0
   },
-  "VERSION" => "1.7.3",
+  "VERSION" => "1.7.4",
   "test" => {
     "TESTS" => "t/*.t"
   }
@@ -39,14 +41,16 @@ my %WriteMakefileArgs = (
 
 my %FallbackPrereqs = (
   "Bio::DB::WebDBSeqI" => 0,
-  "Bio::Root::Test" => 0,
   "File::Spec" => 0,
   "HTTP::Request::Common" => 0,
   "IO::Handle" => 0,
   "IPC::Open3" => 0,
   "Test::More" => 0,
+  "Test::Needs" => 0,
+  "Test::RequiresInternet" => 0,
   "base" => 0,
   "strict" => 0,
+  "utf8" => 0,
   "warnings" => 0
 );
 

debian/changelog

+libbio-db-swissprot-perl (1.7.4-1) unstable; urgency=medium
+
+  * New upstream version
+
+ -- Michael R. Crusoe <michael.crusoe@gmail.com>  Wed, 01 Jan 2020 13:00:17 +0100
+
 libbio-db-swissprot-perl (1.7.3-1) unstable; urgency=low
 
   * Initial release. Closes: #946266

debian/control

@@ -9,6 +9,7 @@ Build-Depends-Indep: libbio-perl-perl,
                      libhttp-message-perl,
                      liblwp-useragent-chicaching-perl,
                      libtest-most-perl,
+                     libtest-needs-perl,
                      libtest-requiresinternet-perl,
                      perl
 Standards-Version: 4.4.1
@@ -21,7 +22,8 @@ Architecture: all
 Depends: ${misc:Depends},
          ${perl:Depends},
          libbio-perl-perl,
-         libhttp-message-perl
+         libhttp-message-perl,
+         libwww-perl
 Breaks: libbio-perl-perl (<< 1.7.3)
 Replaces: libbio-perl-perl (<< 1.7.3)
 Description: Database object interface to SwissProt retrieval

dist.ini

 name = Bio-DB-SwissProt
-version = 1.7.3
+version = 1.7.4
 author = Jason Stajich <jason@bioperl.org>
 copyright_holder = Jason Stajich <jason@bioperl.org>
 license = Perl_5

lib/Bio/DB/SwissProt.pm

@@ -108,7 +108,7 @@ methods. Internal methods are usually preceded with a _
 # Let the code begin...
 
 package Bio::DB::SwissProt;
-$Bio::DB::SwissProt::VERSION = '1.7.3';
+$Bio::DB::SwissProt::VERSION = '1.7.4';
 use strict;
 
 use HTTP::Request::Common;

t/SwissProt.t

-# -*-Perl-*- Test Harness script for Bioperl
-# $Id$
+#!/usr/bin/env perl
+use utf8;
 
 use strict;
+use warnings;
 
-BEGIN {
-    use Bio::Root::Test;
+use Test::More;
+use Test::Needs qw(LWP::UserAgent HTTP::Request::Common Data::Stag);
+use Test::RequiresInternet;
 
-    test_begin(-tests               => 23,
-               -requires_modules    => [qw(IO::String
-                                           LWP::UserAgent
-                                           HTTP::Request::Common
-                                           Data::Stag)],
-               -requires_networking => 1);
-
-    use_ok('Bio::DB::SwissProt');
-}
+use Bio::DB::SwissProt;
 
 ok my $gb = Bio::DB::SwissProt->new(-retrievaltype => 'pipeline',
                                     -delay         => 0);
@@ -31,6 +25,7 @@ my %expected_lengths = (
 
 my ($seq, $seqio);
 
+# keep the SKIP block to deal with intermittent fails
 SKIP: {
     eval {$seq = $gb->get_Seq_by_id('YNB3_YEAST');};
     skip "Couldn't connect to SwissProt with Bio::DB::SwissProt.pm. Skipping those tests", 14 if $@;
@@ -92,4 +87,6 @@ SKIP: {
     like($map->{PYRC_YEAST}[0], qr/^[A-Z0-9]/);
 }
 
+done_testing();
+
 1;