summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2009-01-21 15:55:25 +0000
committerNicholas Clark <nick@ccl4.org>2009-01-21 17:09:11 +0000
commit0da0e728710fd7ef615c1a9711842235a554e595 (patch)
tree2e7cb9ad7a767b3048672d8f934049121c0b2704 /perl.c
parent8583b25748abc73adb4164e557462c026e44fbbe (diff)
downloadperl-0da0e728710fd7ef615c1a9711842235a554e595.tar.gz
Correct the form of the flags passed to perl_get_cv().
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl.c b/perl.c
index f808af8ec9..fbf3e86afc 100644
--- a/perl.c
+++ b/perl.c
@@ -2587,7 +2587,7 @@ Perl_call_pv(pTHX_ const char *sub_name, I32 flags)
{
PERL_ARGS_ASSERT_CALL_PV;
- return call_sv(MUTABLE_SV(get_cv(sub_name, TRUE)), flags);
+ return call_sv(MUTABLE_SV(get_cv(sub_name, GV_ADD)), flags);
}
/*