Update CPANPLUS to 0.85_06

[p5sagit/p5-mst-13.2.git] / lib / CPANPLUS / Dist / Base.pm

diff --git a/lib/CPANPLUS/Dist/Base.pm b/lib/CPANPLUS/Dist/Base.pm
index 630bf53..c7108ed 100644 (file)
--- a/lib/CPANPLUS/Dist/Base.pm
+++ b/lib/CPANPLUS/Dist/Base.pm
@@ -2,9 +2,10 @@ package CPANPLUS::Dist::Base;
 
 use strict;
 
-use vars    qw[@ISA $VERSION];
-@ISA =      qw[CPANPLUS::Dist];
-$VERSION =  '0.01';
+use base    qw[CPANPLUS::Dist];
+use vars    qw[$VERSION];
+$VERSION =  $CPANPLUS::Internals::VERSION = $CPANPLUS::Internals::VERSION;
+
 
 =head1 NAME
 
@@ -56,6 +57,16 @@ class are called:
 
 =cut
 
+=head2 @subs = $Class->methods
+
+Returns a list of methods that this class implements that you can
+override.
+
+=cut
+
+sub methods { 
+    return qw[format_available init prepare create install uninstall] 
+}
 
 =head2 $bool = $Class->format_available
 
@@ -88,7 +99,7 @@ object, which you might do as follows:
     $dist->status->mk_accessors( qw[my_implementation_accessor] );
     
 The C<status> object is implemented as an instance of the 
-C<Object::Accessor> class. Please refer to it's documentation for 
+C<Object::Accessor> class. Please refer to its documentation for 
 details.
     
 Return true if the initialization was successul, and false if it was