X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FShellFrontend.pm;h=3c955063045e8cf2433a65ea0ee6464a2b8ebd15;hb=2548ce615db02d9ebd44d15359c1220aaf06798f;hp=29eac40166649bcc2159c48234ab25aa4bda04fe;hpb=f69aaaffa3d5d090440794721e00cf8fc212ee88;p=scpubgit%2FDX.git

diff --git a/lib/DX/ShellFrontend.pm b/lib/DX/ShellFrontend.pm
index 29eac40..3c95506 100644
--- a/lib/DX/ShellFrontend.pm
+++ b/lib/DX/ShellFrontend.pm
@@ -1,7 +1,7 @@
 package DX::ShellFrontend;
 
-use Types::Standard qw(Enum);
 use IO::Handle;
+use Types::Standard qw(InstanceOf);
 use Caroline;
 use DX::Class;
 
@@ -12,7 +12,10 @@ has session => (
 
 has session_mode => (is => 'rwp', isa => Enum['shell','query'], required => 1);
 
-has readline => (is => 'lazy', builder => sub { Caroline->new });
+has readline => (
+  is => 'lazy', isa => InstanceOf['Caroline'],
+  builder => sub { Caroline->new }
+);
 
 sub BUILD { STDOUT->autoflush(1) }