From ce04c434593810ff13246ee26fe8b17141cb526f Mon Sep 17 00:00:00 2001 From: justme-1968 Date: Mon, 2 Dec 2013 19:49:18 +0000 Subject: [PATCH] option to directly return a value from getFn without calling parent getFn git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@4312 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/33_readingsProxy.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/FHEM/33_readingsProxy.pm b/FHEM/33_readingsProxy.pm index 264e54856..e427f4b0a 100644 --- a/FHEM/33_readingsProxy.pm +++ b/FHEM/33_readingsProxy.pm @@ -247,8 +247,9 @@ readingsProxy_Get($@) my $CMD = $a[0]; my $ARGS = join(" ", @a[1..$#a]); - my $get_fn = eval $get_fn; + my ($get_fn,$direct_return) = eval $get_fn; Log3 $name, 3, $name .": getFn: ". $@ if($@); + return $get_fn if($direct_return); return undef if( !defined($get_fn) ); $v = $get_fn if( $get_fn ); } @@ -315,6 +316,7 @@ readingsProxy_Get($@) has access to $DEVICE, $READING, $CMD and $ARGS.
undef -> do nothing
"" -> pass-through
+ (,1) -> directly return , don't call parent getFn
everything else -> use this instead
  • setFn
    perl expresion that will return the set command forwarded to the parent device.