From eb04df2ef7a3475c2098e34cec196841e2ceedfa Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Fri, 3 Jul 2015 18:47:02 +0000 Subject: [PATCH] 98_SVG.pm: allow commands separated with ; in FileLog expression. git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@8882 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_SVG.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/98_SVG.pm b/fhem/FHEM/98_SVG.pm index a34a464ce..60110ba45 100755 --- a/fhem/FHEM/98_SVG.pm +++ b/fhem/FHEM/98_SVG.pm @@ -1002,7 +1002,7 @@ SVG_doShowLog($$$$;$) my $oll = $attr{global}{verbose}; $attr{global}{verbose} = 0; # Else the filenames will be Log'ged my @path = split(" ", - FW_fC("get $d $file $tmpfile $f $t $srcDesc->{all}")); + FW_fC("get $d $file $tmpfile $f $t $srcDesc->{all}", 1)); $attr{global}{verbose} = $oll; # replace the path with the temporary filenames of the filelog output @@ -1029,7 +1029,7 @@ SVG_doShowLog($$$$;$) my $oll = $attr{global}{verbose}; $attr{global}{verbose} = 0; # Else the filenames will be Log'ged my @path = split(" ", - FW_fC("get $d $file $tmpfile $f $t $srcDesc->{all}")); + FW_fC("get $d $file $tmpfile $f $t $srcDesc->{all}", 1)); $attr{global}{verbose} = $oll; # replace the path with the temporary filenames of the filelog output @@ -1112,7 +1112,7 @@ SVG_getData($$$$$) my $s = $srcDesc->{src}{$src}; my $fname = ($src eq $defs{$d}{LOGDEVICE} ? $defs{$d}{LOGFILE} : "CURRENT"); my $cmd = "get $src $fname INT $f $t ".$s->{arg}; - FW_fC($cmd); + FW_fC($cmd, 1); if($showData) { $ret .= "\n$cmd\n\n"; $ret .= $$internal_data if(ref $internal_data eq "SCALAR");