diff options
| author | Andreas Brachold <vdr07@deltab.de> | 2007-11-10 17:53:53 +0000 |
|---|---|---|
| committer | Andreas Brachold <vdr07@deltab.de> | 2007-11-10 17:53:53 +0000 |
| commit | cfdd733c17cfa4f1a43b827a656e9e53cc2524ac (patch) | |
| tree | b6f659b1281f77628b36768f0888f67b65f9ca48 /lib/Class/MakeMethods/Template/Class.pm | |
| parent | 9c6c30350161efd74faa3c3705096aecb71c0e81 (diff) | |
| download | xxv-cfdd733c17cfa4f1a43b827a656e9e53cc2524ac.tar.gz xxv-cfdd733c17cfa4f1a43b827a656e9e53cc2524ac.tar.bz2 | |
* Remove unsed packages
* Reorder exit routines
Diffstat (limited to 'lib/Class/MakeMethods/Template/Class.pm')
| -rw-r--r-- | lib/Class/MakeMethods/Template/Class.pm | 103 |
1 files changed, 0 insertions, 103 deletions
diff --git a/lib/Class/MakeMethods/Template/Class.pm b/lib/Class/MakeMethods/Template/Class.pm deleted file mode 100644 index c846709..0000000 --- a/lib/Class/MakeMethods/Template/Class.pm +++ /dev/null @@ -1,103 +0,0 @@ -package Class::MakeMethods::Template::Class; - -use Class::MakeMethods::Template::Generic '-isasubclass'; - -$VERSION = 1.008; -use strict; -require 5.0; -use Carp; - -=head1 NAME - -Class::MakeMethods::Template::Class - Associate information with a package - -=head1 SYNOPSIS - - package MyObject; - use Class::MakeMethods::Template::Class ( - scalar => [ 'foo' ] - ); - - package main; - - MyObject->foo('bar') - print MyObject->foo(); - -=head1 DESCRIPTION - -These meta-methods provide access to class-specific values. They are similar to Static, except that each subclass has separate values. - -=cut - -sub generic { - { - '-import' => { - 'Template::Generic:generic' => '*' - }, - 'modifier' => { - }, - 'code_expr' => { - '_VALUE_' => '_ATTR_{data}->{_SELF_CLASS_}', - }, - } -} - -######################################################################## - -=head2 Class:scalar - -Creates methods to handle a scalar variable in the declaring package. - -See the documentation on C<Generic:scalar> for interfaces and behaviors. - -=cut - -######################################################################## - -=head2 Class:array - -Creates methods to handle a array variable in the declaring package. - -See the documentation on C<Generic:array> for interfaces and behaviors. - -=cut - -sub array { - { - '-import' => { - 'Template::Generic:array' => '*', - }, - 'modifier' => { - '-all' => q{ _REF_VALUE_ or @{_ATTR_{data}->{_SELF_CLASS_}} = (); * }, - }, - 'code_expr' => { - '_VALUE_' => '\@{_ATTR_{data}->{_SELF_CLASS_}}', - }, - } -} - -######################################################################## - -=head2 Class:hash - -Creates methods to handle a hash variable in the declaring package. - -See the documentation on C<Generic:hash> for interfaces and behaviors. - -=cut - -sub hash { - { - '-import' => { - 'Template::Generic:hash' => '*', - }, - 'modifier' => { - '-all' => q{ _REF_VALUE_ or %{_ATTR_{data}->{_SELF_CLASS_}} = (); * }, - }, - 'code_expr' => { - '_VALUE_' => '\%{_ATTR_{data}->{_SELF_CLASS_}}', - }, - } -} - -1; |
