[ macperl-Bugs-496263 ] droplet "tarzipme" dies

Bugs item #496263, was opened at 2001-12-23 03:38
You can respond by visiting: 
http://sourceforge.net/tracker/?func=detail&atid=107940&aid=496263&group_id=7940

Category: None
Group: None
Status: Open
Resolution: None
Priority: 5
Submitted By: Axel Rose (axelrose)
Assigned to: Nobody/Anonymous (nobody)
Summary: droplet "tarzipme" dies

Initial Comment:
.... if a file rather than a directory is dropped onto it.

line 174:
FSpDirectoryCopy($dir, $edir, 1) or die "Can't copy $dir to $edir: $^E";

this happens because of line 67 doesn't check for a directory:
$dir  = $ARGV[0] or die "Need directory name";

It suffices for me to change line 67 to:
-d $ARGV[0] and $dir = $ARGV[0] or die "Need directory name\n";


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

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