pervasive type constraints
[scpubgit/DX.git] / lib / DX / ActionBuilder / Null.pm
index 5aac1b3..41109f6 100644 (file)
@@ -4,13 +4,7 @@ use DX::Class;
 
 with 'DX::Role::ActionBuilder';
 
-has target_path => (is => 'ro');
-
-around target_path => sub {
-  my ($orig, $self) = (shift, shift);
-  return undef unless ref($self);
-  return $self->$orig(@_);
-};
+has target_path => (is => 'ro', isa => ValuePath);
 
 sub can_set_value { 0 }