Browse Source

Things

master
freesource 24 years ago
parent
commit
be5e62b23d
  1. 8
      Yard.pm

8
Yard.pm

@ -501,9 +501,17 @@ sub space_check {
my($total_bytes) = 0;
my(%counted);
# %Included synopsis
# /path/file (1|symlink)
# %replaced_by /path/file /path/file .. <=
# %links_to /path/file-symnlink actual-file
# %hardlinked /path/file dev/inode -> stat()
my ($file);
foreach $file (keys %Included) {
print "$file -> $Included{$file} ... $hardlinked{$file}\n";
my($replacement, $devino);
if ($replacement = $replaced_by{$file}) {
##### Use the replacement file instead of this one. In the

Loading…
Cancel
Save