Michael G Schwern wrote:
> On Wed, May 29, 2002 at 11:56:36AM -0400, John Peacock wrote:
> 
>>It still seems to me that safe_rel() should not choke on rooted logicals.
> 
> 
> So how does one fix it?
> 
> 

As Craig pointed out, it is not actually safe_rel that is barfing, it is 
File::Spec->abs2rel() itself.  And I actually think that it is likely to be the 
implied cwd() inside File::Spec that is failing to expand properly:

$ perl -"MFile::Spec" -e "print File::Spec->abs2rel($^X);"
[--.user.jpeacock.perlsrc.perl]perl.exe;1
$ perl -"MFile::Spec" -e "print File::Spec->abs2rel($^X,'dka0:[user.
jpeacock.perlsrc.perl.t]');"
[-]perl.exe;1

These two should both return what the second returns (since the hardcoded path 
is where I actually am at the time).

John

John



-- 
John Peacock
Director of Information Research and Technology
Rowman & Littlefield Publishing Group
4720 Boston Way
Lanham, MD 20706
301-459-3366 x.5010
fax 301-429-5747

Reply via email to