407
|
1 package IMPL::Config::Descriptor;
|
|
2
|
|
3
|
|
4
|
|
5 1;
|
|
6
|
|
7 __END__
|
|
8
|
|
9 =pod
|
|
10
|
|
11 =head1 NAME
|
|
12
|
|
13 C<IMPL::Config::Descriptor> - the abstract base types for the service descriptors
|
|
14
|
|
15 =head1 SYNOPSIS
|
|
16
|
|
17 =begin code
|
|
18
|
|
19 package MyDescriptor;
|
|
20
|
|
21 use IMPL::declare {
|
|
22 base => {
|
|
23 'IMPL::Config::Descriptor' => '@_'
|
|
24 }
|
|
25 };
|
|
26
|
|
27 sub Activate {
|
|
28 my ($this,$context) = @_;
|
|
29
|
|
30 my $service = $context->GetService('service');
|
|
31 my
|
|
32
|
|
33 }
|
|
34
|
|
35 =end code
|
|
36
|
|
37 =head1 MEMBERS
|
|
38
|
|
39 =head1 SEE ALSO
|
|
40
|
|
41 =over
|
|
42
|
|
43 =item * L<ReferenceDescriptor> - describes a reference to the service
|
|
44
|
|
45 =item * L<ServiceDescriptor> - descibes a service factory
|
|
46
|
|
47 =item * L<ValueDescriptor> - describes a value
|
|
48
|
|
49 =back
|
|
50
|
|
51 =cut |