1 files changed, 1 insertions, 1 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 5e096e294f..267070e205 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -475,7 +475,7 @@ PP(pp_die)
 		HV *stash = SvSTASH(SvRV(error));
 		GV *gv = gv_fetchmethod(stash, "PROPAGATE");
 		if (gv) {
-		    SV *file = sv_2mortal(newSVsv(GvSV(PL_curcop->cop_filegv)));
+		    SV *file = sv_2mortal(newSVsv(CopFILESV(PL_curcop)));
 		    SV *line = sv_2mortal(newSViv(PL_curcop->cop_line));
 		    EXTEND(SP, 3);
 		    PUSHMARK(SP);