fix issues with filename paths
authorjoeyh <joeyh@19660600-52fe-0310-9875-adc0d7a7b53c>
Tue, 2 Oct 2007 20:33:17 +0000 (20:33 +0000)
committerjoeyh <joeyh@19660600-52fe-0310-9875-adc0d7a7b53c>
Tue, 2 Oct 2007 20:33:17 +0000 (20:33 +0000)
pristine-gz

index 5471b98..c868ed9 100755 (executable)
@@ -377,7 +377,7 @@ sub gendelta {
        print OUT "@params\n";
        close OUT;
        open(OUT, ">", "$tempdir/filename") || die "$!";
-       print OUT "$filename\n";
+       print OUT basename($filename)."\n";
        close OUT;
        open(OUT, ">", "$tempdir/timestamp") || die "$!";
        print OUT "$timestamp\n";