readingsProxy: überarbeitete Version zum Test

[Dr. Boris Neubert]

Hallo,

daran wurde nichts geändert. Ich habe in den Code geschaut und das sollte noch gehen. $DEVICE bezieht sich auf den primären Proxy:

Code Auswählen Erweitern

  my $set_fn = AttrVal( $hash->{NAME}, "setFn", "" );
  if( $set_fn =~ m/^{.*}$/s ) {
    my $CMD = $a[0];
    my $DEVICE = $primaryDevname;
    my $READING = $primaryReading;
    my $ARGS = join(" ", @a[1..$#a]);

    my $set_fn = eval $set_fn;
    Log3 $name, 3, $name .": setFn: ". $@ if($@);

    readingsSingleUpdate($hash, "lastCmd", $a[0], 0);

    return undef if( !defined($set_fn) );
    $v = $set_fn if( $set_fn ne '' );
  } else {
    readingsSingleUpdate($hash, "lastCmd", $a[0], 0);
  }
Kannst du mal bitte Device-Definition (raw für Forum) posten?

Grüße
Boris