From c7904cf5141e476d20b461960cb99905e31b2cdb Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sun, 18 Mar 2012 11:36:25 +0000 Subject: [PATCH] Evenemap bugfix: dont replace the device name git-svn-id: https://svn.fhem.de/fhem/trunk@1356 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/fhem.pl | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/fhem/fhem.pl b/fhem/fhem.pl index 0804be48b..8a128cd82 100755 --- a/fhem/fhem.pl +++ b/fhem/fhem.pl @@ -2564,6 +2564,7 @@ ReplaceEventMap($$$) my ($dev, $str, $dir) = @_; my $em = $attr{$dev}{eventMap}; return $str if(!$em); + my $dname = shift @{$str} if(!$dir); my $sc = " "; # Split character my $fc = substr($em, 0, 1); # First character of the eventMap @@ -2594,8 +2595,15 @@ ReplaceEventMap($$$) } } return $str if($dir); - return split(" ",$nstr) if($changed); - return @{$str}; + + if($changed) { + my @arr = split(" ",$nstr); + push @arr, $dname; + return @arr; + } else { + unshift @{$str}, $dname; + return @{$str}; + } } sub