diff options
| author | Nicholas Clark <nick@ccl4.org> | 2010-11-26 15:53:56 +0000 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-11-28 13:17:06 -0800 |
| commit | 2dc78664124f51814246e5b3da10c8a9f5fe2726 (patch) | |
| tree | cf749927370f04975bb52b0cef8940bd634f727e /toke.c | |
| parent | d42388159bbfea27efd2de1d76aa62e99f6c8240 (diff) | |
| download | perl-2dc78664124f51814246e5b3da10c8a9f5fe2726.tar.gz | |
Make my $pi := 4; a syntax error.
Previously it interpreted := as an empty attribute list, and issued a
deprecation warning. This change permits := to be used as a binding operator.
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -5228,7 +5228,8 @@ Perl_yylex(pTHX) break; PL_bufptr = s; /* update in case we back off */ if (*s == '=') { - deprecate(":= for an empty attribute list"); + Perl_croak(aTHX_ + "Use of := for an empty attribute list is not allowed"); } goto grabattrs; case XATTRBLOCK: |