From 1b1c657a89f14aba983f6d552c1aba2286acc859 Mon Sep 17 00:00:00 2001
From: fhemzap <>
Date: Mon, 7 Dec 2015 17:22:03 +0000
Subject: [PATCH] HMCCUCHN: Minor changes

git-svn-id: https://svn.fhem.de/fhem/trunk@10120 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/contrib/HMCCU/88_HMCCUCHN.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/fhem/contrib/HMCCU/88_HMCCUCHN.pm b/fhem/contrib/HMCCU/88_HMCCUCHN.pm
index 766c82178..2e7834542 100644
--- a/fhem/contrib/HMCCU/88_HMCCUCHN.pm
+++ b/fhem/contrib/HMCCU/88_HMCCUCHN.pm
@@ -99,6 +99,7 @@ sub HMCCUCHN_Define ($@)
 	}
 
 	$hash->{ccutype} = HMCCU_GetDeviceType ($hash->{ccuaddr}, '');
+	$hash->{channels} = 1;
 	$hash->{statevals} = 'devstate';
 
 	my $arg = shift @a;
@@ -178,7 +179,7 @@ sub HMCCUCHN_Set ($@)
 		if (!defined ($objname) || !defined ($objvalue)) {
 			return HMCCUCHN_SetError ($hash, "Usage: set <name> datapoint <datapoint> <value> [...]");
 		}
-		$objvalue = HMCCU_Substitute ($objvalue, $statevals);
+		$objvalue = HMCCU_Substitute ($objvalue, $statevals, 1);
 
 		# Build datapoint address
 		$objname = $hash->{ccuif}.'.'.$hash->{ccuaddr}.'.'.$objname;
@@ -199,7 +200,7 @@ sub HMCCUCHN_Set ($@)
 		if (!defined ($objvalue)) {
 			return HMCCUCHN_SetError ($hash, "Usage: set <device> devstate <value>");
 		}
-		$objvalue = HMCCU_Substitute ($objvalue, $statevals);
+		$objvalue = HMCCU_Substitute ($objvalue, $statevals, 1);
 
 		# Build datapoint address
 		my $objname = $hash->{ccuif}.'.'.$hash->{ccuaddr}.'.'.$statedatapoint;