diff options
Diffstat (limited to 'lang/perl5/patches/patch-ci')
| -rw-r--r-- | lang/perl5/patches/patch-ci | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lang/perl5/patches/patch-ci b/lang/perl5/patches/patch-ci new file mode 100644 index 00000000000..01324fa0395 --- /dev/null +++ b/lang/perl5/patches/patch-ci @@ -0,0 +1,18 @@ +$NetBSD: patch-ci,v 1.1 2005/06/24 06:43:47 jlam Exp $ + +--- pp_sys.c.orig 2004-10-19 13:07:23.000000000 -0400 ++++ pp_sys.c +@@ -4450,9 +4450,11 @@ PP(pp_gmtime) + when = (Time_t)SvIVx(POPs); + #endif + +- if (PL_op->op_type == OP_LOCALTIME) ++ if (PL_op->op_type == OP_LOCALTIME) { ++ /* Explicitly invoke tzset() as localtime_r may not. */ ++ tzset(); + tmbuf = localtime(&when); +- else ++ } else + tmbuf = gmtime(&when); + + if (GIMME != G_ARRAY) { |