X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Farchival%2Fshared_snarfer.pl;h=c6b9491071892868fa9c4a1beeca8e8f811345b2;hb=cdc8710b5258c1f81ba49f697f04ed9c4939f4cd;hp=6d157163f097f615784d0b0f4019181151c56460;hpb=2ffa93d3a469c59fc5210baeb5ef18f53afd87b0;p=feisty_meow.git diff --git a/scripts/archival/shared_snarfer.pl b/scripts/archival/shared_snarfer.pl index 6d157163..c6b94910 100644 --- a/scripts/archival/shared_snarfer.pl +++ b/scripts/archival/shared_snarfer.pl @@ -129,7 +129,9 @@ sub chdir_to_top { # magic to get the paths to work right. local($drive) = substr($directory, 0, 4); # get just drive letter biz. #print "going to change to $drive\n"; - chdir($drive); + if (length($drive) > 0) { + chdir($drive); + } #print "cwd now=" . cwd() . "\n"; $directory = substr($directory, 4); # rip off absolutist path. #print "using dir now as $directory\n";