[ macperl-Bugs-549611 ] untarzime, installme fail

Bugs item #549611, was opened at 2002-04-27 22:28
You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=107940&aid=549611&group_id=7940

Category: None
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Axel Rose (axelrose)
Assigned to: Nobody/Anonymous (nobody)
Summary: untarzime, installme fail

Initial Comment:
The droplets fail with several .tar.gz files from CPAN
with the error message
  :: already exists

The reason I found is the tar listing. Sometimes it look like this:
Text-PDF-0.16
Text-PDF-0.16/readme.txt
Text-PDF-0.16/MANIFEST
....
i.e. the top level directory not ending with "/".

A simple patch would look like this:
    foreach my $file (@files) {
      $file .= "/" unless $file =~ /\//;
      my $dir = ':' . dirname(Archive::Tar::_munge_file($file));
      die "$dir already exists, will not overwrite\n"
          if -e $dir;
    }


Thanks,
Axel

----------------------------------------------------------------------

You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=107940&aid=549611&group_id=7940