70_ENIGMA2: fix ARRAY ref, forum #14792.msg668593

git-svn-id: https://svn.fhem.de/fhem/trunk@14985 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/70_ENIGMA2.pm

@@ -159,6 +159,11 @@ sub ENIGMA2_Set($@);
 
 sub ENIGMA2_Set($@) {
     my ( $hash, $a, $h ) = @_;
+
+    # a is not an array --> make an array out of $a and $h
+    $a = [ $a, $h ]
+      if ( ref($a) ne 'ARRAY' );
+
     my $name        = shift @$a;
     my $set         = shift @$a;
     my $state       = ReadingsVal( $name, "state", "absent" );