+2009-04-10 Christopher Faylor <me+cygwin@cgf.cx>
+
+ * speclib: Use a more robust method to derive full file path.
+
2009-04-09 Christopher Faylor <me+cygwin@cgf.cx>
* speclib: Semi-revert to previous version but don't try to generate
use Getopt::Long;
use File::Temp qw'tempdir';
use File::Basename;
-use Cwd;
+use File::Spec;
use strict;
sub dllname($;$);
my $nm = shift;
my $ar = shift;
-my $libdll = Cwd::abs_path(shift @ARGV);
-my $lib = Cwd::abs_path(pop @ARGV);
+my $libdll = File::Spec->rel2abs(shift @ARGV);
+my $lib = File::Spec->rel2abs(pop @ARGV);
open my $nm_fd, '-|', $nm, '-Ap', '--defined-only', @ARGV, $libdll or
die "$0: execution of $nm for object files failed - $!\n";