1
0
mirror of https://github.com/postgres/postgres.git synced 2025-07-20 05:03:10 +03:00

Allow building with perl 5.14.

Patch from Alex Hunsaker.
This commit is contained in:
Andrew Dunstan
2011-06-04 19:35:04 -04:00
parent 39dbc62ade
commit cb252c2acd
2 changed files with 6 additions and 1 deletions

View File

@ -874,7 +874,7 @@ plperl_trusted_init(void)
if (!isGV_with_GP(sv) || !GvCV(sv))
continue;
SvREFCNT_dec(GvCV(sv)); /* free the CV */
GvCV(sv) = NULL; /* prevent call via GV */
GvCV_set(sv, NULL); /* prevent call via GV */
}
hv_clear(stash);