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

commandref_static: for debug only (add rebuild option)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@16781 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2018-05-26 18:19:18 +00:00
parent 817a50de95
commit 739889d1ff
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
fhem/contrib/commandref_static.pl
View File

@ -9,6 +9,8 @@ sub _cref_search;
sub _cref_read; sub _cref_read;
sub _cref_write; sub _cref_write;
my $rebuild = (defined($ARGV[0]) && lc($ARGV[0]) eq "rebuild") ? 1 : 0;
my $protVersion=1; my $protVersion=1;
my @lang = ("EN", "DE"); my @lang = ("EN", "DE");
my $modDir = "FHEM"; my $modDir = "FHEM";
@ -20,6 +22,7 @@ for my $lang (@lang) {
my $cmdref = "docs/commandref_frame$sfx.html"; my $cmdref = "docs/commandref_frame$sfx.html";
my $outpath = "docs/cref$sfx"; my $outpath = "docs/cref$sfx";
unlink glob "$outpath/*" if $rebuild;
mkdir $outpath unless (-e $outpath); mkdir $outpath unless (-e $outpath);
open(FH, $cmdref) || die("Cant open $cmdref: $!\n"); open(FH, $cmdref) || die("Cant open $cmdref: $!\n");
@ -72,7 +75,7 @@ for my $lang (@lang) {
next if($fName !~ m/^\d\d_(.*)\.pm$/); next if($fName !~ m/^\d\d_(.*)\.pm$/);
my $mName = $1; my $mName = $1;
my $ts = (stat("$modDir/$fName"))[9]; my $ts = (stat("$modDir/$fName"))[9];
if($protVersion != $fileVersion || if($protVersion != $fileVersion || $rebuild ||
!$modData{$mName} || !$modData{$mName}{ts} || $modData{$mName}{ts}<$ts) { !$modData{$mName} || !$modData{$mName}{ts} || $modData{$mName}{ts}<$ts) {
#print "Checking $fName for $lang short description\n"; #print "Checking $fName for $lang short description\n";