diff options
author | Karl Williamson <public@khwilliamson.com> | 2014-02-20 11:29:15 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2014-02-20 11:47:05 -0700 |
commit | ee0ba7340818251ec0f145a29500a35b067bba83 (patch) | |
tree | b0cd2ab29909400e23275a11ae45a51d23f264f2 /mg.c | |
parent | 850b7ec98b08ce3e7330267f4331f3006ea95551 (diff) | |
download | perl-ee0ba7340818251ec0f145a29500a35b067bba83.tar.gz |
Restore proper functioning of -Mdiagnostics
Commit 1c604e7c7f fixed some pod errors, but broke
./perl -Ilib -Mdiagnostics -e '$/=[]'
This fixes that.
Diffstat (limited to 'mg.c')
-rw-r--r-- | mg.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2769,7 +2769,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg) ); } } else { - /* diag_listed_as: Setting $/ to a %s reference is forbidden */ + /* diag_listed_as: Setting $/ to %s reference is forbidden */ Perl_croak(aTHX_ "Setting $/ to a%s %s reference is forbidden", *reftype == 'A' ? "n" : "", reftype); } |