From: Matt S Trout Date: Thu, 17 Mar 2016 17:39:44 +0000 (+0000) Subject: perl 5.22 was kind enough to point out I'm an idiot X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0cf5075d70e949fe40f5f3f08bcd35f1268446e9;p=scpubgit%2FDX.git 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 --- 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} }