CLACO / Mango-0.01000_09 / lib / Mango / Object / Meta.pm 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
—
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80

              
# $Id: /local/CPAN/Mango/trunk/lib/Mango/Object/Meta.pm 1959 2007-08-10T05:27:29.884596Z claco  $
package Mango::Object::Meta;
use strict;
use warnings;
BEGIN {
    use base qw/Class::Accessor::Grouped/;
    __PACKAGE__->mk_group_accessors('simple', qw/provider parent/);
};
sub new {
    my ($class, $args) = @_;
    return bless $args, $class;
};
1;
__END__
=head1 NAME
Mango::Object::Meta - Module representing object meta information
=head1 SYNOPSIS
    my $object = Mango::Object->new;
    $object->meta->provider($provider);
=head1 DESCRIPTION
Mango::Object::Meta module contains all of the non-column, or "meta" information
for a result object.
=head1 CONSTRUCTOR
=head2 new
=over
=item Arguments: \%args
=back
Creates a new meta object that uses the hash supplied to read/write its
information.
=head1 METHODS
=head2 parent
=over
=item Arguments: $parent
=back
Gets/sets the parent object of the current object.
=head2 provider
=over
=item Arguments: $provider
=back
Gets/sets the Mango::Provider object that is responsible for creating, or
processing updates for the current object.
=head1 SEE ALSO
L<Mango::Object>, L<Mango::Provider>
=head1 AUTHOR
    Christopher H. Laco
    CPAN ID: CLACO
    claco@chrislaco.com
    http://today.icantfocus.com/blog/