print STDERR "\b";
# Which file are we keeping?
- my $keep_file;
+ my $keep_ino;
# If digest link exists, link it to file
if ($digest_st) {
# Old, replace input with old file
print STDERR '-';
link_files($digest_link, $file);
- $keep_file = $digest_link;
+ $keep_ino = $digest_st->ino;
} else {
# New, add input to digest
print STDERR '+';
link_files($file, $digest_link);
- $keep_file = $file;
+ $keep_ino = $st->ino;
}
# A link to the inode indicates we are done, so do it last
+ my $keep_link = prepare_parents("$link_dir/inode", $keep_ino);
print STDERR '_';
- link_files($keep_file, $inode_link);
+ link_files($keep_link, $inode_link);
}
};