ZaneYork
/
zoneminder
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

debug, spacing, quotes

This commit is contained in:
Isaac Connor 2020-06-25 16:04:50 -04:00
parent 85e1dcadf4
commit 08afb50efa
1 changed files with 23 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
onvif/proxy/lib/WSNotification/Interfaces/WSBaseNotificationSender/NotificationProducerPort.pm
View File

@ -20,18 +20,16 @@ sub START {
sub Subscribe { sub Subscribe {
my ($self, $body, $header) = @_; my ($self, $body, $header) = @_;
die "Subscribe must be called as object method (\$self is <$self>)" if not blessed($self); die "Subscribe must be called as object method (\$self is <$self>)" if not blessed($self);
#print " proxy/lib/WSNotification/Interfaces/WSBaseNotificationSender/NotificationProducerPort.pm Subscribe\n";
return $self->SUPER::call({ return $self->SUPER::call({
operation => 'Subscribe', operation => 'Subscribe',
soap_action => 'http://docs.oasis-open.org/wsn/bw-2/Subscribe', soap_action => 'http://docs.oasis-open.org/wsn/bw-2/Subscribe',
style => 'document', style => 'document',
body => { body => {
use => 'literal',
namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
'use' => 'literal', encodingStyle => '',
namespace => 'http://schemas.xmlsoap.org/wsdl/soap/', parts => [qw( WSNotification::Elements::Subscribe )],
encodingStyle => '',
parts => [qw( WSNotification::Elements::Subscribe )],
}, },
header => { header => {
@ -42,39 +40,30 @@ sub Subscribe {
}, $body, $header); }, $body, $header);
} }
sub GetCurrentMessage { sub GetCurrentMessage {
my ($self, $body, $header) = @_; my ($self, $body, $header) = @_;
die "GetCurrentMessage must be called as object method (\$self is <$self>)" if not blessed($self); die "GetCurrentMessage must be called as object method (\$self is <$self>)" if not blessed($self);
return $self->SUPER::call({ return $self->SUPER::call({
operation => 'GetCurrentMessage', operation => 'GetCurrentMessage',
soap_action => 'http://docs.oasis-open.org/wsn/bw-2/GetCurrentMessage', soap_action => 'http://docs.oasis-open.org/wsn/bw-2/GetCurrentMessage',
style => 'document', style => 'document',
body => { body => {
use => 'literal',
namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
encodingStyle => '',
parts => [qw( WSNotification::Elements::GetCurrentMessage )],
},
header => {
'use' => 'literal', },
namespace => 'http://schemas.xmlsoap.org/wsdl/soap/', headerfault => {
encodingStyle => '',
parts => [qw( WSNotification::Elements::GetCurrentMessage )],
}, }
header => { }, $body, $header);
},
headerfault => {
}
}, $body, $header);
} }
1; 1;
__END__ __END__
=pod =pod