Return to metacheck.pl CVS log | Up to [Repository] / foxridge-archiver |
version 1.1, 2004/06/17 15:58:42 | version 1.2, 2004/07/08 17:27:59 |
---|---|
Line 45 if (! $docdir) { | Line 45 if (! $docdir) { |
logger("ABORT", "no document directory given!"); | logger("ABORT", "no document directory given!"); |
exit 1; | exit 1; |
} | } |
# strip double slashes | |
$docdir =~ s/\/\//\//; | |
# strip trailing slashes | # strip trailing slashes |
$docdir =~ s/\/$//; | $docdir =~ s/\/$//; |
if (! -d $docdir) { | if (! -d $docdir) { |