Unbreak panda on jvm also

rakudo · Oct 3, 2014 · a4309ee · a4309ee
1 parent 414d911
commit a4309ee
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/core/IO/Path.pm b/src/core/IO/Path.pm
@@ -316,7 +316,8 @@ my class IO::Path is Cool does IO::FileTestable {
         }
 #?endif
 #?if jvm
-                    $elem = nqp::substr($elem, $cwd_chars + 1) if !$absolute;
+                    $elem = nqp::substr($elem, $cwd_chars + 1)
+                      if !$absolute and !$.is-absolute;
                     take $elem.IO(:$!SPEC,:$CWD) if $test.ACCEPTS($elem);
                 }
             }