View | Details | Raw Unified | Return to bug 6874
Collapse All | Expand All

(-)a/C4/UploadedFiles.pm (-1 / +2 lines)
Lines 150-155 sub UploadFile { Link Here
150
150
151
    my $sha = new Digest::SHA;
151
    my $sha = new Digest::SHA;
152
    $sha->add($data);
152
    $sha->add($data);
153
    $sha->add($filename);
154
    $sha->add($dir);
153
    my $id = $sha->hexdigest;
155
    my $id = $sha->hexdigest;
154
156
155
    # Test if this id already exist
157
    # Test if this id already exist
156
- 

Return to bug 6874