summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-08-09 16:56:19 +0200
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-09-01 07:34:42 +0000
commit089d5d592af05e188741d15eb055de559f1bf619 (patch)
tree8f0e7c723a26dbfee733bab25340cf5d7f90fa2e /pp_ctl.c
parent4fdf8f88a748ed01c597aa0c5a9e5dcdd59adab6 (diff)
downloadperl-089d5d592af05e188741d15eb055de559f1bf619.tar.gz
Re: INC handlers and shutdown-time warnings
From: "Rafael Garcia-Suarez" <rgarciasuarez@gmail.com> Message-ID: <b77c1dce0708090556k68768897yb8ccc1c0dd2ce714@mail.gmail.com> p4raw-id: //depot/perl@31778
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 3d0c1d1b2e..a09d44efbb 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -3307,7 +3307,7 @@ PP(pp_require)
|| (*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];