mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-10 09:16:53 +00:00
SMUtils.pm: update to version 1.20.1
git-svn-id: https://svn.fhem.de/fhem/trunk@23029 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
a7bbf981b0
commit
7e1698a1d7
@ -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.20.0');
|
||||
use version; our $VERSION = version->declare('1.20.1');
|
||||
|
||||
use Exporter ('import');
|
||||
our @EXPORT_OK = qw(
|
||||
@ -1608,26 +1608,29 @@ sub purgeSendqueue {
|
||||
my $prop = $paref->{prop} // carp "got no purgeSendqueue argument" && return;
|
||||
|
||||
my $type = $hash->{TYPE};
|
||||
my $ret = q{};
|
||||
|
||||
if($prop eq "-all-") {
|
||||
delete $hash->{OPIDX};
|
||||
delete $data{$type}{$name}{sendqueue}{entries};
|
||||
$data{$type}{$name}{sendqueue}{index} = 0;
|
||||
return "All entries of SendQueue are deleted";
|
||||
$ret = "All entries of SendQueue are deleted";
|
||||
}
|
||||
elsif($prop eq "-permError-") {
|
||||
for my $idx (keys %{$data{$type}{$name}{sendqueue}{entries}}) {
|
||||
delete $data{$type}{$name}{sendqueue}{entries}{$idx}
|
||||
if($data{$type}{$name}{sendqueue}{entries}{$idx}{forbidSend});
|
||||
}
|
||||
return qq{All entries with state "permanent send error" are deleted};
|
||||
$ret = qq{All entries with state "permanent send error" are deleted};
|
||||
}
|
||||
else {
|
||||
delete $data{$type}{$name}{sendqueue}{entries}{$prop};
|
||||
return qq{SendQueue entry with index "$prop" deleted};
|
||||
$ret = qq{SendQueue entry with index "$prop" deleted};
|
||||
}
|
||||
|
||||
updQueueLength ($hash);
|
||||
|
||||
return;
|
||||
return $ret;
|
||||
}
|
||||
|
||||
#############################################################################################
|
||||
|
Loading…
x
Reference in New Issue
Block a user