Fix 01_Module_Load_Conditional.t on Win32 (broken by #31726)

p4raw-id: //depot/perl@31727

diff --git a/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t b/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t
index c741678..66a7fe1 100644 (file)
--- a/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t
+++ b/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t
@@ -55,6 +55,7 @@ use_ok( 'Module::Load::Conditional' );
     } else {
        @rv_path = File::Spec->splitpath($rv->{file});
     }
+    @rv_path = ($rv_path[0], File::Spec->splitdir($rv_path[1]), $rv_path[2]);
 
     # First element could be blank for some system types like VMS
     shift @rv_path if $rv_path[0] eq '';