mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-04 05:16:45 +00:00
SMUtils.pm: update to version 1.17.1
git-svn-id: https://svn.fhem.de/fhem/trunk@22958 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
bd076ca531
commit
81c2c243a8
@ -41,7 +41,7 @@ use FHEM::SynoModules::ErrCodes qw(:all); # Erro
|
||||
use GPUtils qw( GP_Import GP_Export );
|
||||
use Carp qw(croak carp);
|
||||
|
||||
use version; our $VERSION = version->declare('1.17.0');
|
||||
use version; our $VERSION = version->declare('1.17.1');
|
||||
|
||||
use Exporter ('import');
|
||||
our @EXPORT_OK = qw(
|
||||
@ -111,7 +111,7 @@ BEGIN {
|
||||
};
|
||||
|
||||
# Standardvariablen
|
||||
my $splitdef = ":"; # Standard Character für split ...
|
||||
my $splitdef = ":"; # Standard Character für split ...
|
||||
|
||||
my $carpnohash = "got no hash value";
|
||||
my $carpnoname = "got no name value";
|
||||
@ -123,6 +123,12 @@ my $carpnoaddr = "got no server address from hash";
|
||||
my $carpnoport = "got no server port from hash";
|
||||
my $carpnoprot = "got no protocol from hash";
|
||||
|
||||
my %hasqhandler = ( # Hash addSendqueue Handler
|
||||
SSCal => { fn => \&_addSendqueueSimple, },
|
||||
SSFile => { fn => \&_addSendqueueSimple, },
|
||||
SSChatBot => { fn => \&_addSendqueueExtended, },
|
||||
);
|
||||
|
||||
###############################################################################
|
||||
# Clienthash übernehmen oder zusammenstellen
|
||||
# Identifikation ob über FHEMWEB ausgelöst oder nicht -> erstellen $hash->CL
|
||||
@ -1271,17 +1277,14 @@ sub addSendqueue {
|
||||
my $name = $paref->{name} // carp $carpnoname && return;
|
||||
|
||||
my $hash = $defs{$name};
|
||||
my $type = $hash->{TYPE};
|
||||
|
||||
if($type eq "SSCal") {
|
||||
_addSendqueueSimple ($paref);
|
||||
}
|
||||
elsif ($type eq "SSChatBot") {
|
||||
_addSendqueueExtended ($paref);
|
||||
}
|
||||
else {
|
||||
Log3($name, 1, qq{$name - ERROR - no module specific add Sendqueue handler for type "$type" found});
|
||||
}
|
||||
my $type = $hash->{TYPE};
|
||||
|
||||
if($hasqhandler{$type}) {
|
||||
&{$hasqhandler{$type}{fn}} ($paref);
|
||||
return;
|
||||
}
|
||||
|
||||
Log3($name, 1, qq{$name - ERROR - no module specific add Sendqueue handler for type "$type" found});
|
||||
|
||||
return;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user