From edd26ddf02e995ea3f0c14bd7ac395d9f24038c5 Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 10 Apr 2016 10:41:49 +0000
Subject: [PATCH] 10_ZWave.pm: do not delete a number in the beginning of the
 config Value (Forum #51865)

git-svn-id: https://svn.fhem.de/fhem/trunk@11218 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/10_ZWave.pm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/fhem/FHEM/10_ZWave.pm b/fhem/FHEM/10_ZWave.pm
index 50d64f5bd..13ced9ddd 100755
--- a/fhem/FHEM/10_ZWave.pm
+++ b/fhem/FHEM/10_ZWave.pm
@@ -2259,12 +2259,12 @@ ZWave_clockParse($$)
 }
 
 sub
-ZWave_cleanString($$)
+ZWave_cleanString($$$)
 {
-  my ($c, $postfix) = @_;
+  my ($c, $postfix, $isValue) = @_;
   my $shortened = 0;
 
-  $c =~ s/^[0-9.]+ //g;
+  $c =~ s/^[0-9.]+ //g if(!$isValue);
   $c =~ s/Don.t/Dont/g; # Bugfix
   if($c =~ m/^(.+)\.(.+)$/ && $2 !~ m/^[ \d]+$/) { # delete second sentence
     $c = $1; $shortened++;
@@ -2324,7 +2324,7 @@ ZWave_configParseModel($;$)
       $h{index} = $1 if($line =~ m/index="([^"]*)"/i); # 1, 2, etc
       $h{read_only}  = $1 if($line =~ m/read_only="([^"]*)"/i); # true,false
       $h{write_only} = $1 if($line =~ m/write_only="([^"]*)"/i); # true,false
-      my ($cmd,$shortened) = ZWave_cleanString($h{label}, $h{index});
+      my ($cmd,$shortened) = ZWave_cleanString($h{label}, $h{index}, 0);
       $cmdName = "config$cmd";
       $h{Help} = "";
       $h{Help} .= "Full text for $cmdName is: $h{label}<br>" if($shortened);
@@ -2335,7 +2335,7 @@ ZWave_configParseModel($;$)
     if($line =~ m/^\s*<Item/) {
       my $label = $1 if($line =~ m/label="([^"]*)"/i);
       my $value = $1 if($line =~ m/value="([^"]*)"/i);
-      my ($item, $shortened) = ZWave_cleanString($label, $value);
+      my ($item, $shortened) = ZWave_cleanString($label, $value, 1);
       $hash{$cmdName}{Item}{$item} = $value;
       $hash{$cmdName}{type} = "list";   # Forum #42604
       $hash{$cmdName}{Help} .= "Full text for $item is $label<br>"