make exists unnecessary

[scpubgit/DKit.git] / lib / DX / State.pm

diff --git a/lib/DX/State.pm b/lib/DX/State.pm
index 899c0d9..f9d886b 100644 (file)
--- a/lib/DX/State.pm
+++ b/lib/DX/State.pm
@@ -27,6 +27,11 @@ has dependencies => (is => 'ro', default => sub { {} });
 
 has actions => (is => 'ro', default => sub { {} });
 
+sub has_scope_var {
+  my ($self, $name) = @_;
+  return !!$self->scope->{$name};
+}
+
 sub scope_var {
   my ($self, $name) = @_;
   my $id = $self->scope->{$name}