UNDEFINED changes

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@519 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2009-12-21 18:03:56 +00:00
parent bf8d44356e
commit ec743ec845
20 changed files with 101 additions and 64 deletions

View File

@@ -32,7 +32,8 @@ CUL_EM_Define($$)
my ($hash, $def) = @_;
my @a = split("[ \t][ \t]*", $def);
return "wrong syntax: define <name> CUL_EM <code> [corr1 corr2 CostPerUnit BasicFeePerMonth]"
return "wrong syntax: define <name> CUL_EM <code> ".
"[corr1 corr2 CostPerUnit BasicFeePerMonth]"
if(int(@a) < 3 || int(@a) > 7);
return "Define $a[0]: wrong CODE format: valid is 1-12"
if($a[2] !~ m/^\d$/ || $a[2] < 1 || $a[2] > 12);
@@ -235,10 +236,10 @@ CUL_EM_Parse($$)
} else {
Log 1, "CUL_EM detected, Code $cde $val";
return "UNDEFINED CUL_EM_$cde CUL_EM $cde";
}
return "";
}
1;