From 0027c459f12b7b67da484ea0ec53d4731f1903b5 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <>
Date: Tue, 13 Jan 2015 14:10:05 +0000
Subject: [PATCH] 98_SVG.pm: fix the "Show preprocessed input" for some cases
 (Forum #32028)

git-svn-id: https://svn.fhem.de/fhem/trunk@7545 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/01_FHEMWEB.pm | 3 +--
 fhem/FHEM/98_SVG.pm     | 2 +-
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/fhem/FHEM/01_FHEMWEB.pm b/fhem/FHEM/01_FHEMWEB.pm
index 308e1c4bb..fc1a9275d 100755
--- a/fhem/FHEM/01_FHEMWEB.pm
+++ b/fhem/FHEM/01_FHEMWEB.pm
@@ -989,7 +989,6 @@ sub
 FW_detailSelect($$$$)
 {
   my ($d, $cmd, $list,$class) = @_;
-Log 1, "$cmd $d $list";
   return if(!$list || $FW_hiddenroom{input});
   my @al = sort map { s/:.*//;$_ } split(" ", $list);
 
@@ -1575,7 +1574,7 @@ FW_select($$$$$@)
 {
   my ($id, $name, $valueArray, $selected, $class, $jSelFn) = @_;
   $jSelFn = ($jSelFn ? "onchange=\"$jSelFn\"" : "");
-  $id =~ s/\./_/g;      # to avoid problems in JS DOM Search
+  $id =~ s/\./_/g if($id);      # to avoid problems in JS DOM Search
   $id = ($id ? "id=\"$id\" informId=\"$id\"" : "");
   my $s = "<select $jSelFn $id name=\"$name\" class=\"$class\">";
   foreach my $v (@{$valueArray}) {
diff --git a/fhem/FHEM/98_SVG.pm b/fhem/FHEM/98_SVG.pm
index f24bfacb1..ceba1237c 100755
--- a/fhem/FHEM/98_SVG.pm
+++ b/fhem/FHEM/98_SVG.pm
@@ -530,7 +530,7 @@ SVG_showData()
     return 1;
   }
   SVG_calcOffsets($d, $wl);
-  $FW_RET = SVG_getData($d, $SVG_devs{$d}{from}, $SVG_devs{$d}{to}, $srcDesc,1);
+  $FW_RET = SVG_getData($wl,$SVG_devs{$d}{from}, $SVG_devs{$d}{to}, $srcDesc,1);
   $FW_RET =~ s/\n/<br>/gs;
   return 1;
 }