|
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 |
- |
|
|