From a06de4dcf2448ead9a5f5dbd87366727ebd91aca Mon Sep 17 00:00:00 2001
From: Steve Hay <steve.m.hay@googlemail.com>
Date: Thu, 30 Nov 2017 09:05:45 +0000
Subject: Fix Windows build following commit 184f90dc41

But t/run/switches.t test 131 still fails, with perl.exe crashing.
---
 doio.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'doio.c')

diff --git a/doio.c b/doio.c
index 565f896c01..9f76c10ea4 100644
--- a/doio.c
+++ b/doio.c
@@ -1267,7 +1267,7 @@ S_dir_unchanged(pTHX_ const char *orig_pv, MAGIC *mg) {
     if (!PERL_FILE_IS_ABSOLUTE(orig_pv)
         && PerlLIO_stat(SvPVX(*temp_psv), &statbuf) < 0) {
         Perl_croak(aTHX_ "Cannot complete in-place edit of %" SVf ": %s",
-                   *orig_psv,
+                   orig_pv,
                    "Work file is missing - did you change directory?");
     }
 #endif
-- 
cgit v1.2.1