2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 03:06:37 +00:00

commandref_join.pl: noWarnings patch from justme1968 (Forum #46371)

git-svn-id: https://svn.fhem.de/fhem/trunk@10471 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-01-12 08:26:07 +00:00
parent a0ee73acc3
commit 780a97b78e
2 changed files with 7 additions and 4 deletions

View File

@ -384,8 +384,8 @@ doUpdate($$$$)
if($canJoin && $upd_needJoin && $curr == $max) {
chdir($root);
uLog(1, "Calling $^X $cj, this may take a while");
my $ret = `$^X $cj`;
uLog(1, "Calling $^X $cj -noWarnings, this may take a while");
my $ret = `$^X $cj -noWarnings`;
foreach my $l (split(/[\r\n]+/, $ret)) {
uLog(1, $l);
}

View File

@ -8,7 +8,10 @@ use strict;
use warnings;
# $Id$
my $noWarnings = grep $_ eq '-noWarnings', @ARGV;
use constant TAGS => qw{ul li code b i u table tr td};
my %mods;
my @modDir = ("FHEM");
foreach my $modDir (@modDir) {
@ -115,12 +118,12 @@ EOF
}
}
print "$lang $mods{$mod}: No a-tag with name=\"$mod\" \n"
if(!$suffix && $docCount && !$hasLink);
if(!$suffix && $docCount && !$hasLink && !$noWarnings);
foreach $tag (TAGS) {
print("$lang $mods{$mod}: Unbalanced $tag ".
"($tagcount{$tag}, last line ok: $llwct{$tag})\n")
if($tagcount{$tag});
if($tagcount{$tag} && !$noWarnings);
}
}