X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDX%2FActionPolicy%2FLockScope.pm;h=203ff1cb6b4457923142f5f8b97b92801f7ed16b;hb=cfae7810d594e9f9425e7c564c62f444f254fe43;hp=caa8b960fcdf1a7686469983b01fccf2b0a79a18;hpb=22d295940695930eebfbd7d0bd2e7495667cbb49;p=scpubgit%2FDX.git

diff --git a/lib/DX/ActionPolicy/LockScope.pm b/lib/DX/ActionPolicy/LockScope.pm
index caa8b96..203ff1c 100644
--- a/lib/DX/ActionPolicy/LockScope.pm
+++ b/lib/DX/ActionPolicy/LockScope.pm
@@ -4,9 +4,9 @@ use DX::Class;
 
 with 'DX::Role::ActionPolicy';
 
-has lock_to_depth => (is => 'ro', required => 1);
+has lock_to_depth => (is => 'ro', required => 1, isa => Int);
 
-has next_policy => (is => 'ro', required => 1);
+has next_policy => (is => 'ro', required => 1, isa => ActionPolicy);
 
 sub allows {
   my ($self, $action) = @_;