encapsulated-package-features

[gitmo/Class-MOP.git] / lib / Class / MOP / Module.pm

diff --git a/lib/Class/MOP/Module.pm b/lib/Class/MOP/Module.pm
index eee05f5..7e18bdc 100644 (file)
--- a/lib/Class/MOP/Module.pm
+++ b/lib/Class/MOP/Module.pm
@@ -6,7 +6,12 @@ use warnings;
 
 use Scalar::Util 'blessed';
 
-our $VERSION = '0.01';
+our $VERSION   = '0.02';
+#our $AUTHORITY = {
+#    cpan   => 'STEVAN',
+#    mailto => 'stevan@iinteractive.com',
+#    http   => '//www.iinteractive.com/'
+#};
 
 use base 'Class::MOP::Package';
 
@@ -17,11 +22,24 @@ sub meta {
     Class::MOP::Class->initialize(blessed($_[0]) || $_[0]);
 }
 
+# QUESTION:
+# can the version be an attribute of the 
+# module? I think it should be, but we need
+# to somehow assure that it always is stored
+# in the symbol table instead of being stored 
+# into the instance structure itself
+
 sub version {  
     my $self = shift;
     ${$self->get_package_symbol('$VERSION')};
 }
 
+#sub authority {  
+#    my $self = shift;
+#    $self->get_package_symbol('$AUTHORITY');
+#}
+
+
 1;
 
 __END__