Return to MakeTorrents.pl CVS log | Up to [local] / openbsd / OpenBSDTorrents |
version 1.12, 2005/05/02 22:49:54 | version 1.13, 2005/05/03 05:33:15 | ||
---|---|---|---|
|
|
||
{ | { | ||
my $basedir = shift; | my $basedir = shift; | ||
return undef if $basedir =~ /packages/; | #return undef if $basedir =~ /packages/; | ||
my ($dirs, $files) = Get_Files_and_Dirs($basedir); | my ($dirs, $files) = Get_Files_and_Dirs($basedir); | ||
if (@$files) { | if (@$files) { |