perl 5.22 was kind enough to point out I'm an idiot

diff --git a/lib/DX/Scope.pm b/lib/DX/Scope.pm
index 214eb4f..c18022a 100644 (file)
--- a/lib/DX/Scope.pm
+++ b/lib/DX/Scope.pm
@@ -28,7 +28,7 @@ sub lookup {
     return $targ;
   }
   return $self->globals->get_member_at($symbol)
-   or die "No such name in scope: $symbol";
+   || die "No such name in scope: $symbol";
 }
 
 sub depth { $#{$_[0]->locals} }