2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-28 15:04:51 +00:00

zwave_configconvert.pl: patch from krikan (Forum #100280)

git-svn-id: https://svn.fhem.de/fhem/trunk@19973 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-08-09 20:22:43 +00:00
parent 50ab3ff8aa
commit f777e12ef6

View File

@ -43,7 +43,8 @@ foreach my $file (`find $ARGV[0] -name \*.xml`) {
while(my $l = <FH>) { while(my $l = <FH>) {
next if($l =~ m/^<\?xml/); next if($l =~ m/^<\?xml/);
chomp($l); chomp($l);
$l =~ s/^<Product.*xmlns.*/<Product sourceFile="$name">/; $l =~ s/<!--.*-->//g;
$l =~ s/^(.*)<Product.*xmlns.*/$1<Product sourceFile="$name">/;
$l =~ s/\r//g; $l =~ s/\r//g;
$l =~ s/\t/ /g; $l =~ s/\t/ /g;
#$l =~ s/^ *//g; #$l =~ s/^ *//g;
@ -52,6 +53,14 @@ foreach my $file (`find $ARGV[0] -name \*.xml`) {
if($l !~ m/>$/ || $l =~ m/^\s*<Help>\s*$/) { $buffer .= " ".$l; next; } if($l !~ m/>$/ || $l =~ m/^\s*<Help>\s*$/) { $buffer .= " ".$l; next; }
if($buffer && $l =~ m/>$/) { $l = "$buffer $l"; $buffer=""; } if($buffer && $l =~ m/>$/) { $l = "$buffer $l"; $buffer=""; }
$l =~ s/<!--.*-->//g; $l =~ s/<!--.*-->//g;
# $l =~ s/<MetaData.*<\/MetaData>//g;
# $l =~ s/<MetaDataItem.*<\/MetaDataItem>//g;
# $l =~ s/<Entry.author.*<\/Entry>//g;
# $l =~ s/<ChangeLog.*<\/ChangeLog>//g;
# $l =~ s/<MetaData>//g;
# $l =~ s/<\/MetaData>//g;
# $l =~ s/<ChangeLog>//g;
# $l =~ s/<\/ChangeLog>//g;
$l =~ s/ *$//g; $l =~ s/ *$//g;
print $l,"\n" if($l); print $l,"\n" if($l);
} }