Hallo Zusammen,
falls es noch jemand braucht - bei mir geht es so, in 67_ECMDDevice.pm Zeile 31 folgende violette Ziele hinzufügen:
Zitatpackage main;
use strict;
use warnings;
use Time::HiRes qw(gettimeofday);
use SetExtensions;
sub ECMDDevice_Get($@);
sub ECMDDevice_Set($@);
und in der Nähe von Zeile 268 die rote Zeile auskommentieren (oder löschen) und das Violette hinzufügen:
Zitatmy $cmdname= $a[1];
my $IOhash= $hash->{IODev};
my $classname= $hash->{fhem}{classname};
if(!defined($IOhash->{fhem}{classDefs}{$classname}{sets}{$cmdname})) {
my $sets= $IOhash->{fhem}{classDefs}{$classname}{sets};
my $list = join(' ', sort keys %$sets);
return SetExtensions($hash, $list, $name, $cmdname, @a[2 .. $#a]);
#return "Unknown argument $cmdname, choose one of " . join(' ', sort keys %$sets);
}
Fertig! ;) Mein ECMDDevice kann nun auch on-for-timer, etc. pp...
Gruß
Jochen