In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/72fb396a39a42fb8f014aad05b2a85adaac6a470?hp=ed0cf058d67700902ba366dd1fa5f1327d56f95c>
- Log ----------------------------------------------------------------- commit 72fb396a39a42fb8f014aad05b2a85adaac6a470 Author: Alexandr Savca <[email protected]> Date: Thu Jul 4 14:55:38 2019 +0300 pp_sys.c: fix the position of HAS_SETNETENT definement Else, DIE() will bever be executed. ----------------------------------------------------------------------- Summary of changes: pp_sys.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pp_sys.c b/pp_sys.c index 304e1b50f8..0214367ea6 100644 --- a/pp_sys.c +++ b/pp_sys.c @@ -5279,8 +5279,8 @@ PP(pp_shostent) DIE(aTHX_ PL_no_sock_func, PL_op_desc[PL_op->op_type]); #endif break; -#ifdef HAS_SETNETENT case OP_SNETENT: +#ifdef HAS_SETNETENT PerlSock_setnetent(stayopen); #else DIE(aTHX_ PL_no_sock_func, PL_op_desc[PL_op->op_type]); -- Perl5 Master Repository
