276f86
From 49bf49b99a7ffb12b68035f096c160bc51e48775 Mon Sep 17 00:00:00 2001
276f86
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
276f86
Date: Thu, 21 Nov 2019 09:22:33 +0100
276f86
Subject: [PATCH] Use system Object::HashBase
276f86
MIME-Version: 1.0
276f86
Content-Type: text/plain; charset=UTF-8
276f86
Content-Transfer-Encoding: 8bit
276f86
276f86
Signed-off-by: Petr Písař <ppisar@redhat.com>
276f86
---
276f86
 Makefile.PL                 | 1 +
276f86
 lib/Term/Table.pm           | 2 +-
276f86
 lib/Term/Table/Cell.pm      | 2 +-
276f86
 lib/Term/Table/CellStack.pm | 2 +-
276f86
 lib/Term/Table/LineBreak.pm | 2 +-
276f86
 5 files changed, 5 insertions(+), 4 deletions(-)
276f86
276f86
diff --git a/Makefile.PL b/Makefile.PL
276f86
index 44de066..4d4c7d4 100644
276f86
--- a/Makefile.PL
276f86
+++ b/Makefile.PL
276f86
@@ -20,6 +20,7 @@ my %WriteMakefileArgs = (
276f86
     "Carp" => 0,
276f86
     "Importer" => "0.024",
276f86
     "List::Util" => 0,
276f86
+    "Object::HashBase" => "0.008",
276f86
     "Scalar::Util" => 0
276f86
   },
276f86
   "TEST_REQUIRES" => {
276f86
diff --git a/lib/Term/Table.pm b/lib/Term/Table.pm
276f86
index 578eba8..3190bcd 100644
276f86
--- a/lib/Term/Table.pm
276f86
+++ b/lib/Term/Table.pm
276f86
@@ -11,7 +11,7 @@ use Scalar::Util qw/blessed/;
276f86
 use List::Util qw/max sum/;
276f86
 use Carp qw/croak carp/;
276f86
 
276f86
-use Term::Table::HashBase qw/rows _columns collapse max_width mark_tail sanitize show_header auto_columns no_collapse header allow_overflow pad/;
276f86
+use Object::HashBase 0.008 qw/rows _columns collapse max_width mark_tail sanitize show_header auto_columns no_collapse header allow_overflow pad/;
276f86
 
276f86
 sub BORDER_SIZE()   { 4 }    # '| ' and ' |' borders
276f86
 sub DIV_SIZE()      { 3 }    # ' | ' column delimiter
276f86
diff --git a/lib/Term/Table/Cell.pm b/lib/Term/Table/Cell.pm
276f86
index 978ef06..10d2b70 100644
276f86
--- a/lib/Term/Table/Cell.pm
276f86
+++ b/lib/Term/Table/Cell.pm
276f86
@@ -9,7 +9,7 @@ use Term::Table::Util qw/uni_length/;
276f86
 
276f86
 use List::Util qw/sum/;
276f86
 
276f86
-use Term::Table::HashBase qw/value border_left border_right _break _widths border_color value_color reset_color/;
276f86
+use Object::HashBase 0.008 qw/value border_left border_right _break _widths border_color value_color reset_color/;
276f86
 
276f86
 my %CHAR_MAP = (
276f86
     # Special case, \n should render as \n, but also actually do the newline thing
276f86
diff --git a/lib/Term/Table/CellStack.pm b/lib/Term/Table/CellStack.pm
276f86
index 7b99f6a..a948d10 100644
276f86
--- a/lib/Term/Table/CellStack.pm
276f86
+++ b/lib/Term/Table/CellStack.pm
276f86
@@ -4,7 +4,7 @@ use warnings;
276f86
 
276f86
 our $VERSION = '0.015';
276f86
 
276f86
-use Term::Table::HashBase qw/-cells -idx/;
276f86
+use Object::HashBase 0.008 qw/-cells -idx/;
276f86
 
276f86
 use List::Util qw/max/;
276f86
 
276f86
diff --git a/lib/Term/Table/LineBreak.pm b/lib/Term/Table/LineBreak.pm
276f86
index dc70ca3..ef95f7e 100644
276f86
--- a/lib/Term/Table/LineBreak.pm
276f86
+++ b/lib/Term/Table/LineBreak.pm
276f86
@@ -8,7 +8,7 @@ use Carp qw/croak/;
276f86
 use Scalar::Util qw/blessed/;
276f86
 use Term::Table::Util qw/uni_length/;
276f86
 
276f86
-use Term::Table::HashBase qw/string gcstring _len _parts idx/;
276f86
+use Object::HashBase 0.008 qw/string gcstring _len _parts idx/;
276f86
 
276f86
 sub init {
276f86
     my $self = shift;
276f86
-- 
276f86
2.21.0
276f86