Load XML-Feed-0.03 into trunk.

[catagits/XML-Feed.git] / inc / Module / Install.pm

diff --git a/inc/Module/Install.pm b/inc/Module/Install.pm
index eeb4c1e..24649fd 100644 (file)
--- a/inc/Module/Install.pm
+++ b/inc/Module/Install.pm
@@ -1,9 +1,9 @@
 #line 1 "inc/Module/Install.pm - /Library/Perl/5.8.1/Module/Install.pm"
 # $File: //depot/cpan/Module-Install/lib/Module/Install.pm $ $Author: autrijus $
-# $Revision: #67 $ $Change: 1885 $ $DateTime: 2004/03/11 05:55:27 $ vim: expandtab shiftwidth=4
+# $Revision: #69 $ $Change: 2301 $ $DateTime: 2004/07/13 07:16:40 $ vim: expandtab shiftwidth=4
 
 package Module::Install;
-$VERSION = '0.33';
+$VERSION = '0.35';
 
 die << "." unless $INC{join('/', inc => split(/::/, __PACKAGE__)).'.pm'};
 Please invoke ${\__PACKAGE__} with:
@@ -22,8 +22,9 @@ use File::Find ();
 use File::Path ();
 
 @inc::Module::Install::ISA = 'Module::Install';
+*inc::Module::Install::VERSION = *VERSION;
 
-#line 129
+#line 132
 
 sub import {
     my $class = shift;
@@ -46,7 +47,7 @@ sub import {
     delete $INC{"$self->{path}.pm"};
 }
 
-#line 156
+#line 159
 
 sub autoload {
     my $self = shift;
@@ -66,7 +67,7 @@ sub autoload {
     };
 }
 
-#line 181
+#line 184
 
 sub new {
     my ($class, %args) = @_;
@@ -91,7 +92,7 @@ sub new {
     bless(\%args, $class);
 }
 
-#line 210
+#line 213
 
 sub call {
     my $self   = shift;
@@ -102,7 +103,7 @@ sub call {
     goto &{$obj->can($method)};
 }
 
-#line 225
+#line 228
 
 sub load {
     my ($self, $method) = @_;
@@ -126,7 +127,7 @@ END
     $obj;
 }
 
-#line 255
+#line 258
 
 sub load_extensions {
     my ($self, $path, $top_obj) = @_;
@@ -145,7 +146,7 @@ sub load_extensions {
     }
 }
 
-#line 279
+#line 282
 
 sub find_extensions {
     my ($self, $path) = @_;
@@ -168,4 +169,4 @@ sub find_extensions {
 
 __END__
 
-#line 614
+#line 620