Check the stat result.

This commit is contained in:
Klaas Freitag 2013-05-16 12:46:06 +02:00
parent 5c79d8bdef
commit 4af8f470e8

View file

@ -228,9 +228,13 @@ sub assertFile($$)
{
my ($localFile, $res) = @_;
print "Asserting $localFile and " . $res->get_property("rel_uri") . "\n";
print "Asserting $localFile and " . $res->get_property("rel_uri") . "\n";
my $remoteModTime = $res->get_property( "lastmodifiedepoch" ) ;
my $stat_ok = stat( toFileName($localFile));
print " *** STAT failed for $localFile\n" unless( $stat_ok );
my @info = stat( toFileName($localFile) );
my $localModTime = $info[9];
assert( $remoteModTime == $localModTime, "Modified-Times differ: remote: $remoteModTime <-> local: $localModTime" );