diff --git a/lib/Minilisp.pm b/lib/Minilisp.pm index 795518b..70e16b4 100644 --- a/lib/Minilisp.pm +++ b/lib/Minilisp.pm @@ -366,7 +366,7 @@ sub parser_expr { return sub { my $ctx = shift; my $name = $tok->{value}; - die "Undefined idnetifier $name" unless + die "Undefined identifier $name" unless exists $ctx->{$name}; return $ctx->{$name}; }