projects
/
libwww-opensearch-perl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Imported Upstream version 0.14
[libwww-opensearch-perl.git]
/
inc
/
Module
/
Install
/
Win32.pm
diff --git
a/inc/Module/Install/Win32.pm
b/inc/Module/Install/Win32.pm
index
4f808c7
..
dcc6f57
100644
(file)
--- a/
inc/Module/Install/Win32.pm
+++ b/
inc/Module/Install/Win32.pm
@@
-4,11
+4,11
@@
package Module::Install::Win32;
use strict;
use Module::Install::Base;
use strict;
use Module::Install::Base;
-use vars qw{$VERSION
$ISCORE @ISA
};
+use vars qw{$VERSION
@ISA $ISCORE
};
BEGIN {
BEGIN {
- $VERSION = '0.68';
- $ISCORE = 1;
+ $VERSION = '0.71';
@ISA = qw{Module::Install::Base};
@ISA = qw{Module::Install::Base};
+ $ISCORE = 1;
}
# determine if the user needs nmake, and download it if needed
}
# determine if the user needs nmake, and download it if needed
@@
-16,7
+16,7
@@
sub check_nmake {
my $self = shift;
$self->load('can_run');
$self->load('get_file');
my $self = shift;
$self->load('can_run');
$self->load('get_file');
-
+
require Config;
return unless (
$^O eq 'MSWin32' and
require Config;
return unless (
$^O eq 'MSWin32' and
@@
-38,8
+38,7
@@
sub check_nmake {
remove => 1,
);
remove => 1,
);
- if (!$rv) {
- die <<'END_MESSAGE';
+ die <<'END_MESSAGE' unless $rv;
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
@@
-59,7
+58,7
@@
You may then resume the installation process described in README.
-------------------------------------------------------------------------------
END_MESSAGE
-------------------------------------------------------------------------------
END_MESSAGE
- }
+
}
1;
}
1;