Change 31778 by [EMAIL PROTECTED] on 2007/09/01 07:34:42
Subject: Re: INC handlers and shutdown-time warnings
From: "Rafael Garcia-Suarez" <[EMAIL PROTECTED]>
Date: Thu, 9 Aug 2007 14:56:19 +0200
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/pp_ctl.c#623 edit
Differences ...
==== //depot/perl/pp_ctl.c#623 (text) ====
Index: perl/pp_ctl.c
--- perl/pp_ctl.c#622~31757~ 2007-08-28 01:56:29.000000000 -0700
+++ perl/pp_ctl.c 2007-09-01 00:34:42.000000000 -0700
@@ -3307,7 +3307,7 @@
|| (*name == ':' && name[1] != ':' && strchr(name+2,
':'))
#endif
) {
- const char *dir = SvPV_nolen_const(dirsv);
+ const char *dir = SvOK(dirsv) ? SvPV_nolen_const(dirsv) :
"";
#ifdef MACOS_TRADITIONAL
char buf1[256];
char buf2[256];
End of Patch.
