From 544a5e247f0afd56ab50b45d485d97432b8614a6 Mon Sep 17 00:00:00 2001
From: Marko Oldenburg <leongaultier@gmail.com>
Date: Tue, 19 Dec 2017 20:49:19 +0100
Subject: [PATCH] bugfix

---
 74_AMADDevice.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/74_AMADDevice.pm b/74_AMADDevice.pm
index f1f0f4f..5c2b201 100644
--- a/74_AMADDevice.pm
+++ b/74_AMADDevice.pm
@@ -136,7 +136,7 @@ sub AMADDevice_Define($$) {
     my ( $hash, $def ) = @_;
     my @a = split( "[ \t]+", $def );
     
-    return "too few parameters: define <name> AMADDevice <HOST-IP> <amad_id> <remoteServer>" if( @a != 4 );
+    return "too few parameters: define <name> AMADDevice <HOST-IP> <amad_id> <remoteServer>" if( @a != 5 );
     return "Cannot define a AMAD device. Perl modul $missingModul is missing." if ( $missingModul );