From 738531ae8b81805d59ebb79ec46e1f35b40efcf6 Mon Sep 17 00:00:00 2001
From: Brent Laabs <bslaabs@gmail.com>
Date: Sun, 12 May 2013 00:43:55 -0700
Subject: [PATCH] fix jnthn++'s report of infinite recursion in
 IO::Spec::Unix.rel2abs

---
 src/core/IO/Spec/Unix.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/core/IO/Spec/Unix.pm b/src/core/IO/Spec/Unix.pm
index cc79e23c4bc..2f3c116438b 100644
--- a/src/core/IO/Spec/Unix.pm
+++ b/src/core/IO/Spec/Unix.pm
@@ -167,7 +167,7 @@ my class IO::Spec::Unix {
     method rel2abs( $path, $base is copy = $*CWD) {
         return self.canonpath($path) if self.is-absolute($path);
         if !self.is-absolute( $base ) {
-            $base = self.rel2abs( $base )
+            $base = self.rel2abs( $base, $*CWD ) unless $base eq $*CWD;
         }
         self.catdir( $base, $path );
     }