hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-21 07:47:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix dots

Browse Source
This commit is contained in:
minima 2002-01-08 12:33:11 +00:00
parent 8486af73ea
commit 9b3374e76b
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cmd/save.pl
View File

@ -24,9 +24,11 @@ if ($line =~ /-a/) { # append to the file
$app_req = '>>';
}
$DB::single = 1;
my ($fn, $rest) = split /\s+/, $line, 2;
$fn = "$main::root/packclus/$fn" unless $fn =~ m|^/|;
$fn =~ s/..//g;
$fn =~ s/\.\.//g;
$fn =~ s|/+|/|g;
$fn .= '_' . cldate if $date_req;
$fn .= '_' . ztime if $time_req;