Lines 31-46
our $metadata = {
Link Here
|
31 |
}; |
31 |
}; |
32 |
|
32 |
|
33 |
sub new { |
33 |
sub new { |
34 |
my ( $self, $params ) = @_; |
34 |
my ( $class, $args ) = @_; |
35 |
|
35 |
|
36 |
my $backend = { |
36 |
$args->{'metadata'} = $metadata; |
37 |
_logger => $params->{logger}, |
37 |
$args->{'_logger'} = $args->{logger}; |
38 |
_config => $params->{config}, |
38 |
$args->{'_config'} = $args->{config}; |
39 |
_plugin => $self, |
39 |
$args->{'_plugin'} = $class; |
40 |
}; |
|
|
41 |
|
40 |
|
42 |
bless $backend, $self; |
41 |
my $self = $class->SUPER::new($args); |
43 |
return $backend; |
42 |
return $self; |
44 |
} |
43 |
} |
45 |
|
44 |
|
46 |
sub capabilities { |
45 |
sub capabilities { |
47 |
- |
|
|