diff options
| author | Jesse Vincent <jesse@bestpractical.com> | 2010-05-05 14:40:26 -0400 |
|---|---|---|
| committer | Jesse Vincent <jesse@bestpractical.com> | 2010-05-05 14:40:26 -0400 |
| commit | 930a5abbcbc469d98692fb3b93594ece3545211a (patch) | |
| tree | 6e8ecf26d6c9f9a5d27ac168bb17e87debd886f8 /toke.c | |
| parent | 7186b0badf2e072222edb463867230cf8820e369 (diff) | |
| download | perl-930a5abbcbc469d98692fb3b93594ece3545211a.tar.gz | |
Revert "Deprecation warnings should always be mandatory since 5.12.0"
This reverts commit a7e260e62a5e47961e908363da32ef16f41301b2.
Zefram asked me to revert this as he's going to be doing something more
pluggable
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -13101,8 +13101,8 @@ Perl_scan_num(pTHX_ const char *start, YYSTYPE* lvalp) hex(ish) fractions... but '..' is OK. */ if (s[0] == '.' && s[1] != '.') { - Perl_ck_warner_d(aTHX_ packWARN(WARN_DEPRECATED), - "Dot after %s literal is concatenation", base); + Perl_ck_warner(aTHX_ packWARN(WARN_DEPRECATED), + "Dot after %s literal is concatenation", base); } sv = newSV(0); |