[Rt-commit] r5731 - in RT-Extension-CommandByEmail: . inc/Module
ruz at bestpractical.com
ruz at bestpractical.com
Tue Aug 8 22:51:37 EDT 2006
Author: ruz
Date: Tue Aug 8 22:51:36 2006
New Revision: 5731
Modified:
RT-Extension-CommandByEmail/META.yml
RT-Extension-CommandByEmail/inc/Module/AutoInstall.pm
RT-Extension-CommandByEmail/inc/Module/Install.pm
RT-Extension-CommandByEmail/inc/Module/Install/AutoInstall.pm
RT-Extension-CommandByEmail/inc/Module/Install/Base.pm
RT-Extension-CommandByEmail/inc/Module/Install/Can.pm
RT-Extension-CommandByEmail/inc/Module/Install/Fetch.pm
RT-Extension-CommandByEmail/inc/Module/Install/Include.pm
RT-Extension-CommandByEmail/inc/Module/Install/Makefile.pm
RT-Extension-CommandByEmail/inc/Module/Install/Metadata.pm
RT-Extension-CommandByEmail/inc/Module/Install/Win32.pm
RT-Extension-CommandByEmail/inc/Module/Install/WriteAll.pm
Log:
* update M::I
Modified: RT-Extension-CommandByEmail/META.yml
==============================================================================
--- RT-Extension-CommandByEmail/META.yml (original)
+++ RT-Extension-CommandByEmail/META.yml Tue Aug 8 22:51:36 2006
@@ -4,7 +4,7 @@
IPC::Open2: 0
Test::More: 0
distribution_type: module
-generated_by: Module::Install version 0.62
+generated_by: Module::Install version 0.63
license: perl
name: RT-Extension-CommandByMail
no_index:
Modified: RT-Extension-CommandByEmail/inc/Module/AutoInstall.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/AutoInstall.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/AutoInstall.pm Tue Aug 8 22:51:36 2006
@@ -639,7 +639,9 @@
# check for version numbers that are not in decimal format
if ( ref($cur) or ref($min) or $cur =~ /v|\..*\./ or $min =~ /v|\..*\./ ) {
- if ( $version::VERSION or defined( _load('version') ) ) {
+ if ( ( $version::VERSION or defined( _load('version') )) and
+ version->can('new')
+ ) {
# use version.pm if it is installed.
return (
@@ -750,4 +752,4 @@
__END__
-#line 988
+#line 990
Modified: RT-Extension-CommandByEmail/inc/Module/Install.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install.pm Tue Aug 8 22:51:36 2006
@@ -28,7 +28,7 @@
# This is not enforced yet, but will be some time in the next few
# releases once we can make sure it won't clash with custom
# Module::Install extensions.
- $VERSION = '0.62';
+ $VERSION = '0.63';
}
# Whether or not inc::Module::Install is actually loaded, the
@@ -51,6 +51,22 @@
END_DIE
}
+# If the script that is loading Module::Install is from the future,
+# then make will detect this and cause it to re-run over and over
+# again. This is bad. Rather than taking action to touch it (which
+# is unreliable on some platforms and requires write permissions)
+# for now we should catch this and refuse to run.
+if ( -f $0 and (stat($0))[9] > time ) {
+ die << "END_DIE";
+Your installer $0 has a modification time in the future.
+
+This is known to create infinite loops in make.
+
+Please correct this, then run $0 again.
+
+END_DIE
+}
+
use Cwd ();
use File::Find ();
use File::Path ();
Modified: RT-Extension-CommandByEmail/inc/Module/Install/AutoInstall.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/AutoInstall.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/AutoInstall.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Base.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Base.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Base.pm Tue Aug 8 22:51:36 2006
@@ -1,7 +1,7 @@
#line 1
package Module::Install::Base;
-$VERSION = '0.62';
+$VERSION = '0.63';
# Suspend handler for "redefined" warnings
BEGIN {
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Can.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Can.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Can.pm Tue Aug 8 22:51:36 2006
@@ -11,7 +11,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Fetch.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Fetch.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Fetch.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Include.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Include.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Include.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Makefile.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Makefile.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Makefile.pm Tue Aug 8 22:51:36 2006
@@ -7,7 +7,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Metadata.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Metadata.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Metadata.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -123,9 +123,9 @@
require Module::Build;
my $build = Module::Build->new(
- dist_name => $self->{name},
- dist_version => $self->{version},
- license => $self->{license},
+ dist_name => $self->name,
+ dist_version => $self->version,
+ license => $self->license,
);
$self->provides(%{ $build->find_dist_packages || {} });
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/Win32.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/Win32.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/Win32.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
Modified: RT-Extension-CommandByEmail/inc/Module/Install/WriteAll.pm
==============================================================================
--- RT-Extension-CommandByEmail/inc/Module/Install/WriteAll.pm (original)
+++ RT-Extension-CommandByEmail/inc/Module/Install/WriteAll.pm Tue Aug 8 22:51:36 2006
@@ -6,7 +6,7 @@
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.63';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
More information about the Rt-commit
mailing list