FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

98_update.pm: check for the local size of the file, split commandref_join.pl answers (Forum #36773)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@8502 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2015-04-30 13:23:09 +00:00
parent c5dbfe043c
commit ac2a6ebf96
1 changed files with 9 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
fhem/FHEM/98_update.pm
View File

@ -199,19 +199,21 @@ doUpdate($$)
next if($fName !~ m/$arg/);
} else {
my $sz = -s "$root/$fName";
next if($lh{$fName} &&
$lh{$fName}{TS} eq $r[1] &&
$sz && $sz eq $r[2] &&
$lh{$fName}{LEN} eq $r[2]);
}
uLog 1, "List of new / modified files since last update:"
if($arg eq "check" && $nChanged == 0);
$needJoin = 1 if($fName =~ m/commandref_frame/ || $fName =~ m/\d+.*.pm/);
next if($fName =~ m/commandref.*html/ && $fName !~ m/frame/ && $canJoin);
$nChanged++;
if($fName =~ m,docs/commandref(_..)?.html, && $canJoin) {
$needJoin = 1;
next;
}
uLog 1, "$r[0] $fName";
next if($arg eq "check");
@ -255,7 +257,9 @@ doUpdate($$)
chdir($root);
uLog(1, "Calling $^X $cj, this may take a while");
my $ret = `$^X $cj`;
uLog(1, $ret) if($ret);
foreach my $l (split(/[\r\n]+/, $ret)) {
uLog(1, $l);
}
}
uLog(1, "");