[libtest-postgresql-perl] 05/05: add patch to remove use of Tie::Hash::Method

[Don Armstrong]

This is an automated email from the git hooks/post-receive script.

don pushed a commit to branch master
in repository libtest-postgresql-perl.

commit 7f6ee55d086423c87c7dcd57000f9900249f25b3
Author: Don Armstrong <don at donarmstrong.com>
Date:   Thu Feb 15 11:08:31 2018 -0800

    add patch to remove use of Tie::Hash::Method
---
 debian/control                             |  4 +---
 debian/patches/remove_tie_hash_method.diff | 38 ++++++++++++++++++++++++++++++
 debian/patches/series                      |  1 +
 debian/rules                               |  2 +-
 4 files changed, 41 insertions(+), 4 deletions(-)

diff --git a/debian/control b/debian/control
index 405e526..668d49d 100644
--- a/debian/control
+++ b/debian/control
@@ -3,14 +3,13 @@ Section: perl
 Priority: optional
 Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
 Uploaders: Don Armstrong <don at debian.org>
-Build-Depends: debhelper (>= 10)
+Build-Depends: debhelper (>= 10), quilt
 Build-Depends-Indep: libdbd-pg-perl,
  libdbi-perl,
  libfile-which-perl,
  libfunction-parameters-perl,
  libmoo-perl,
  libtest-sharedfork-perl (>= 0.06),
- libtie-hash-method-perl,
  libtry-tiny-perl,
  libtype-tiny-perl,
  perl
@@ -28,7 +27,6 @@ Depends: ${misc:Depends}, ${perl:Depends},
  libfile-which-perl,
  libfunction-parameters-perl,
  libmoo-perl,
- libtie-hash-method-perl,
  libtry-tiny-perl,
  libtype-tiny-perl
 Description: sets up and destroys temporary PostgreSQL instances for testing
diff --git a/debian/patches/remove_tie_hash_method.diff b/debian/patches/remove_tie_hash_method.diff
new file mode 100644
index 0000000..545177a
--- /dev/null
+++ b/debian/patches/remove_tie_hash_method.diff
@@ -0,0 +1,38 @@
+Subject: Remove use of Tie::Hash::Method which only provides a
+ deprecation notice; deprecate %Defaults
+Author: Don Armstrong <don at debian.org>
+Bug-Debian: 
+Bug:
+Last-Update: 2018-02-15
+Forwarded: not-needed
+--- a/lib/Test/PostgreSQL.pm
++++ b/lib/Test/PostgreSQL.pm
+@@ -16,23 +16,6 @@
+ our $VERSION = '1.23';
+ our $errstr;
+ 
+-# Deprecate use of %Defaults as we want to remove this package global
+-use Tie::Hash::Method;
+-tie our %Defaults, 'Tie::Hash::Method', FETCH => sub {
+-    my $msg = "\nWARNING: using \$Test::PostgreSQL::Defaults is DEPRECATED.";
+-    if ( $_[1] =~ /^(initdb|postmaster)_args$/ ) {
+-        $msg .= " Use Test::PostgreSQL->new( extra_$_[1] => ... ) instead.";
+-    }
+-    warn $msg;
+-    return $_[0]->base_hash->{ $_[1] };
+-  };
+-
+-%Defaults = (
+-    auto_start      => 2,
+-    initdb_args     => '-U postgres -A trust',
+-    postmaster_args => '-h 127.0.0.1 -F',
+-);
+-
+ # Various paths that Postgres gets installed under, sometimes with a version on the end,
+ # in which case take the highest version. We append /bin/ and so forth to the path later.
+ # *Note that these are used only if the program isn't already in the path!*
+@@ -688,3 +671,4 @@
+ See L<http://www.perlfoundation.org/artistic_license_2_0> for more information.
+ 
+ =cut
++2
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..c7f686a
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+remove_tie_hash_method.diff
diff --git a/debian/rules b/debian/rules
index 2d33f6a..f6b359a 100755
--- a/debian/rules
+++ b/debian/rules
@@ -1,4 +1,4 @@
 #!/usr/bin/make -f
 
 %:
-	dh $@
+	dh $@ --with quilt

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtest-postgresql-perl.git