Build.PL                  | 1 -

 lib/App/Asciio/Actions.pm | 1 +

 t/001_load.t              | 7 +++++--

 t/004_angled_arrows.t     | 3 +--

 4 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/Build.PL b/Build.PL

index 2ad6c55..10c1cab 100644

--- a/Build.PL

+++ b/Build.PL

@@ -248,7 +248,6 @@ my $build = $class->new

 		'Test::NoWarnings' => 0,

 		'Test::Warn' => 0,

 		'Directory::Scratch::Structured' => 0,

-		'Hash::Slice' => 0,

 		},

 	requires => 

diff --git a/lib/App/Asciio/Actions.pm b/lib/App/Asciio/Actions.pm

index 556bd7e..43f0403 100644

--- a/lib/App/Asciio/Actions.pm

+++ b/lib/App/Asciio/Actions.pm

@@ -5,6 +5,7 @@ $|++ ;

 use strict;

 use warnings;

+use Readonly;

 #------------------------------------------------------------------------------------------------------

diff --git a/t/001_load.t b/t/001_load.t

index 157ca86..6b85ddb 100644

--- a/t/001_load.t

+++ b/t/001_load.t

@@ -16,7 +16,10 @@ for my $warning (warnings())

 	my $message = $warning->getMessage() ;

 	chomp $message ;

-	fail("No warnings. Found '$message'!") unless $message =~ /asked to lazy-load .* but that package is not registered/ ;

+	fail("No warnings. Found '$message'!") unless (

+		$message =~ /asked to lazy-load .* but that package is not registered/

+		|| $message =~ /^Class::ISA/

+	);

 	}

-clear_warnings() ;

\ No newline at end of file

+clear_warnings() ;

diff --git a/t/004_angled_arrows.t b/t/004_angled_arrows.t

index 4c366d9..f9efc51 100644

--- a/t/004_angled_arrows.t

+++ b/t/004_angled_arrows.t

@@ -6,7 +6,6 @@ use lib qw(lib lib/stripes) ;

 use Test::More 'no_plan';

 use Data::TreeDumper ;

-use Hash::Slice 'slice' ;

 #-----------------------------------------------------------------------------

@@ -681,7 +680,7 @@ EOR

 			"\n$text", "\n$angled_arrow_test->{RENDERING}",

 			DumpTree

 				(

-				scalar(slice($angled_arrow_test, qw[END_X END_Y DIRECTION])),

+				scalar(%$angled_arrow_test{qw[END_X END_Y DIRECTION]}),

 				'',

 				DISPLAY_ADDRESS => 0,

 				USE_ASCII => 0 ,