FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-01-31 18:59:33 +00:00
Code Issues Releases Wiki Activity

CUL_HM:DIS_EP update5

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@11867 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2016-07-31 09:44:26 +00:00
parent 42246f657a
commit 3e120e07f2
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
fhem/FHEM/10_CUL_HM.pm
View File

@ -4895,12 +4895,12 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
,none => ''
);
my %disp_sounds = (
off => 'C0', longlong => 'C1', longshort => 'C2'
,long2short => 'C3', short => 'C4', shortshort => 'C5'
off => 'C0', longlong => 'C1', longshort => 'C2'
,long2short => 'C3', short => 'C4', shortshort => 'C5'
,long => 'C6'
);
my %disp_signals = (
off => 'F0', red => 'F1', green => 'F2', orange => 'F3'
off => 'F0', red => 'F1', green => 'F2', orange => 'F3'
);
# msg: 'text,icon;text,icon;text,icon'
my ($msg, $sound, $rep, $pause, $sig) = @a[2..$#a];
@ -4954,6 +4954,7 @@ sub CUL_HM_Set($@) {#+++++++++++++++++ set command+++++++++++++++++++++++++++++
}
# Convert string to hex codes
else {
$text =~ s/\\_/ /g;
foreach my $ch (split ('', substr ($text, 0, 12))) {
$snd .= sprintf ("%02X", ord ($ch));
}