Kaydet (Commit) 2e4ef99b authored tarafından Bjoern Michaelsen's avatar Bjoern Michaelsen

use File::Spec instead of Cwd

üst 82211526
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
# reads a list of dependency files from a file, opens and # reads a list of dependency files from a file, opens and
# concatenates them, while eliding duplicate nop rules. # concatenates them, while eliding duplicate nop rules.
use Cwd 'fast_abs_path'; use File::Spec;
sub read_depfiles($) sub read_depfiles($)
{ {
...@@ -33,7 +33,7 @@ sub canonicalize_path($) ...@@ -33,7 +33,7 @@ sub canonicalize_path($)
my $path = $2; my $path = $2;
my $post =$3; my $post =$3;
if (length($path) > 0 && index($path,$ENV{SRCDIR}) == 0) { if (length($path) > 0 && index($path,$ENV{SRCDIR}) == 0) {
$path = Cwd::fast_abs_path($2); $path = File::Spec->rel2abs($2);
$path = "\$(SRCDIR)" . substr($path, length($ENV{SRCDIR})); $path = "\$(SRCDIR)" . substr($path, length($ENV{SRCDIR}));
} }
#print "## $pre$path$post"; #print "## $pre$path$post";
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment