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