also show current file version if available
This commit is contained in:
parent
f745aa25a1
commit
838222e500
8
findoid
8
findoid
|
@ -77,6 +77,14 @@ sub getversions {
|
|||
}
|
||||
}
|
||||
|
||||
my $filename = "$dataset/$relpath";
|
||||
my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks) = stat($filename);
|
||||
|
||||
if (defined $size) {
|
||||
$versions{$filename}{'size'} = $size;
|
||||
$versions{$filename}{'mtime'} = $mtime;
|
||||
}
|
||||
|
||||
return %versions;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in New Issue