[Rt-commit] r5462 - in Class-Accessor-Named: . lib lib/Class lib/Class/Accessor

jesse at bestpractical.com jesse at bestpractical.com
Sat Jun 24 23:42:22 EDT 2006


Author: jesse
Date: Sat Jun 24 23:42:22 2006
New Revision: 5462

Added:
   Class-Accessor-Named/Changes
   Class-Accessor-Named/MANIFEST
   Class-Accessor-Named/Makefile.PL
   Class-Accessor-Named/README
   Class-Accessor-Named/lib/
   Class-Accessor-Named/lib/Class/
   Class-Accessor-Named/lib/Class/Accessor/
   Class-Accessor-Named/lib/Class/Accessor/Named.pm
   Class-Accessor-Named/t/
   Class-Accessor-Named/t/00.load.t
   Class-Accessor-Named/t/pod-coverage.t
   Class-Accessor-Named/t/pod.t
Modified:
   Class-Accessor-Named/   (props changed)

Log:
 r35267 at truegrounds:  jesse | 2006-06-24 23:42:14 -0400
 * Initial commit


Added: Class-Accessor-Named/Changes
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/Changes	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,5 @@
+Revision history for Class-Accessor-Named
+
+0.0.1  Sat Jun 24 23:29:35 2006
+       Initial release.
+

Added: Class-Accessor-Named/MANIFEST
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/MANIFEST	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,9 @@
+Changes
+MANIFEST
+META.yml # Will be created by "make dist"
+Makefile.PL
+README
+lib/Class/Accessor/Named.pm
+t/00.load.t
+t/pod-coverage.t
+t/pod.t

Added: Class-Accessor-Named/Makefile.PL
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/Makefile.PL	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,10 @@
+use inc::Module::Install;
+
+name ('Class-Accessor-Named');
+author ('Jesse Vincent <jesse at bestpractical.com>');
+version_from ('lib/Class/Accessor/Named.pm');
+abstract_from('lib/Class/Accessor/Named.pm');
+license('perl');
+requires('Test::More');
+
+&WriteAll;

Added: Class-Accessor-Named/README
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/README	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,40 @@
+Class-Accessor-Named version 0.0.1
+
+[ REPLACE THIS...
+
+  The README is used to introduce the module and provide instructions on
+  how to install the module, any machine dependencies it may have (for
+  example C compilers and installed libraries) and any other information
+  that should be understood before the module is installed.
+
+  A README file is required for CPAN modules since CPAN extracts the
+  README file from a module distribution so that people browsing the
+  archive can use it get an idea of the modules uses. It is usually a
+  good idea to provide version information here so that people can
+  decide whether fixes for the module are worth downloading.
+]
+
+
+INSTALLATION
+
+To install this module, run the following commands:
+
+    perl Makefile.PL
+    make
+    make test
+    make install
+
+
+
+DEPENDENCIES
+
+None.
+
+
+COPYRIGHT AND LICENCE
+
+Copyright (C) 2006, Best Practical Solutions LLC.
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.
+

Added: Class-Accessor-Named/lib/Class/Accessor/Named.pm
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/lib/Class/Accessor/Named.pm	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,178 @@
+package Class::Accessor::Named;
+use base qw/Class::Accessor::Fast/;
+
+
+our $VERSION = '0.001';
+
+use warnings;
+use strict;
+use Carp;
+
+
+use Sub::Name qw/subname/;
+# Module implementation here
+
+sub make_accessor {
+    my($class, $field) = @_;
+    return subname "AUTOLOADED::$class"."::"."$field" =>  $class->SUPER::make_accessor(@_);
+}
+sub make_ro_accessor {
+    my($class, $field) = @_;
+    return subname "AUTOLOADED::$class"."::"."$field" =>  $class->SUPER::make_accessor(@_);
+}
+
+sub make_wo_accessor {
+    my($class, $field) = @_;
+    return subname "AUTOLOADED::$class"."::"."$field" =>  $class->SUPER::make_accessor(@_);
+
+}
+
+
+1; # Magic true value required at end of module
+__END__
+
+=head1 NAME
+
+Class::Accessor::Named - [One line description of module's purpose here]
+
+
+=head1 SYNOPSIS
+
+    use Class::Accessor::Named;
+
+=for author to fill in:
+    Brief code example(s) here showing commonest usage(s).
+    This section will be as far as many users bother reading
+    so make it as educational and exeplary as possible.
+  
+  
+=head1 DESCRIPTION
+
+=for author to fill in:
+    Write a full description of the module and its features here.
+    Use subsections (=head2, =head3) as appropriate.
+
+
+=head1 INTERFACE 
+
+=for author to fill in:
+    Write a separate section listing the public components of the modules
+    interface. These normally consist of either subroutines that may be
+    exported, or methods that may be called on objects belonging to the
+    classes provided by the module.
+
+
+=head1 DIAGNOSTICS
+
+=for author to fill in:
+    List every single error and warning message that the module can
+    generate (even the ones that will "never happen"), with a full
+    explanation of each problem, one or more likely causes, and any
+    suggested remedies.
+
+=over
+
+=item C<< Error message here, perhaps with %s placeholders >>
+
+[Description of error here]
+
+=item C<< Another error message here >>
+
+[Description of error here]
+
+[Et cetera, et cetera]
+
+=back
+
+
+=head1 CONFIGURATION AND ENVIRONMENT
+
+=for author to fill in:
+    A full explanation of any configuration system(s) used by the
+    module, including the names and locations of any configuration
+    files, and the meaning of any environment variables or properties
+    that can be set. These descriptions must also include details of any
+    configuration language used.
+  
+Class::Accessor::Named requires no configuration files or environment variables.
+
+
+=head1 DEPENDENCIES
+
+=for author to fill in:
+    A list of all the other modules that this module relies upon,
+    including any restrictions on versions, and an indication whether
+    the module is part of the standard Perl distribution, part of the
+    module's distribution, or must be installed separately. ]
+
+None.
+
+
+
+
+
+=head1 INCOMPATIBILITIES
+
+=for author to fill in:
+    A list of any modules that this module cannot be used in conjunction
+    with. This may be due to name conflicts in the interface, or
+    competition for system or program resources, or due to internal
+    limitations of Perl (for example, many modules that use source code
+    filters are mutually incompatible).
+
+None reported.
+
+
+=head1 BUGS AND LIMITATIONS
+
+=for author to fill in:
+    A list of known problems with the module, together with some
+    indication Whether they are likely to be fixed in an upcoming
+    release. Also a list of restrictions on the features the module
+    does provide: data types that cannot be handled, performance issues
+    and the circumstances in which they may arise, practical
+    limitations on the size of data sets, special cases that are not
+    (yet) handled, etc.
+
+No bugs have been reported.
+
+Please report any bugs or feature requests to
+C<bug-class-accessor-named at rt.cpan.org>, or through the web interface at
+L<http://rt.cpan.org>.
+
+
+=head1 AUTHOR
+
+Jesse Vincent  C<< <jesse at bestpractical.com> >>
+
+
+=head1 LICENCE AND COPYRIGHT
+
+Copyright (c) 2006, Best Practical Solutions, LLC.  All rights reserved.
+
+This module is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself. See L<perlartistic>.
+
+
+=head1 DISCLAIMER OF WARRANTY
+
+BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
+EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE
+ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH
+YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
+NECESSARY SERVICING, REPAIR, OR CORRECTION.
+
+IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE
+LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL,
+OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
+THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
+RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
+FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
+SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.

Added: Class-Accessor-Named/t/00.load.t
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/t/00.load.t	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,7 @@
+use Test::More tests => 1;
+
+BEGIN {
+use_ok( 'Class::Accessor::Named' );
+}
+
+diag( "Testing Class::Accessor::Named $Class::Accessor::Named::VERSION" );

Added: Class-Accessor-Named/t/pod-coverage.t
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/t/pod-coverage.t	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,6 @@
+#!perl -T
+
+use Test::More;
+eval "use Test::Pod::Coverage 1.04";
+plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
+all_pod_coverage_ok();

Added: Class-Accessor-Named/t/pod.t
==============================================================================
--- (empty file)
+++ Class-Accessor-Named/t/pod.t	Sat Jun 24 23:42:22 2006
@@ -0,0 +1,6 @@
+#!perl -T
+
+use Test::More;
+eval "use Test::Pod 1.14";
+plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
+all_pod_files_ok();


More information about the Rt-commit mailing list