summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2006-04-13 11:27:52 +0100
committerNicholas Clark <nick@ccl4.org>2006-04-13 10:09:20 +0000
commit8ee4cf2435c265a68309f8b98520e063bbdc8e42 (patch)
tree4cccc083bc5bf66ad70fa6b597d427c4b54f36b4 /mg.c
parent32fc9b6af894c845c5b239287596b88571b3fcdf (diff)
downloadperl-8ee4cf2435c265a68309f8b98520e063bbdc8e42.tar.gz
Re: [PATCH] add pTHX_ parameter to new_warnings_bitfield()
Message-ID: <443E1998.9090909@uk.radan.com> Date: Thu, 13 Apr 2006 10:27:52 +0100 p4raw-id: //depot/perl@27784
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 19219026f5..d7105b51ce 100644
--- a/mg.c
+++ b/mg.c
@@ -2286,7 +2286,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
const char *const p = SvPV_const(sv, len);
PL_compiling.cop_warnings
- = Perl_new_warnings_bitfield(PL_compiling.cop_warnings,
+ = Perl_new_warnings_bitfield(aTHX_ PL_compiling.cop_warnings,
p, len);
if (isWARN_on(PL_compiling.cop_warnings, WARN_ONCE))