only send the aux string if there is one to send

This commit is contained in:
Mariano Alvira 2009-05-09 16:39:42 -04:00
parent dc893dba57
commit 29d8cc6035

View file

@ -103,9 +103,11 @@ while(1) {
print "done sending files.\n";
print "sending " ;
print @ARGV;
print ",\n";
if(scalar(@ARGV)!=0) {
print "sending " ;
print @ARGV;
print ",\n";
}
$ob->write(@ARGV);
$ob->write(',');