diff options
| author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-04-15 21:53:56 +0100 |
|---|---|---|
| committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2014-04-15 22:00:44 +0100 |
| commit | 84d7dacc0cf1fae82700fa22ee4991accd0a084e (patch) | |
| tree | 0bd7f964b049ebeb95979c4aa069cdb634964d64 | |
| parent | de84ff2bd45d2188c47d37bd2cff39e195bfaa5e (diff) | |
| download | perl-84d7dacc0cf1fae82700fa22ee4991accd0a084e.tar.gz | |
Skip writable tests in ExtUtils-Install when root
Bump ExtUtils::Install to 1.66
| -rw-r--r-- | dist/ExtUtils-Install/lib/ExtUtils/Install.pm | 4 | ||||
| -rw-r--r-- | dist/ExtUtils-Install/t/Install.t | 10 |
2 files changed, 10 insertions, 4 deletions
diff --git a/dist/ExtUtils-Install/lib/ExtUtils/Install.pm b/dist/ExtUtils-Install/lib/ExtUtils/Install.pm index ab60b6af17..67981ac6a2 100644 --- a/dist/ExtUtils-Install/lib/ExtUtils/Install.pm +++ b/dist/ExtUtils-Install/lib/ExtUtils/Install.pm @@ -38,11 +38,11 @@ ExtUtils::Install - install files from here to there =head1 VERSION -1.65 +1.66 =cut -$VERSION = '1.65'; # <-- do not forget to update the POD section just above this line! +$VERSION = '1.66'; # <-- do not forget to update the POD section just above this line! $VERSION = eval $VERSION; =pod diff --git a/dist/ExtUtils-Install/t/Install.t b/dist/ExtUtils-Install/t/Install.t index 47fcc264e0..e45e1dd362 100644 --- a/dist/ExtUtils-Install/t/Install.t +++ b/dist/ExtUtils-Install/t/Install.t @@ -226,7 +226,10 @@ SKIP: { }, ]); - ok( !-w "$bigdir/DummyHard.pm", 'DummyHard.pm not writeable' ); + SKIP: { + skip 'everywhere is writable to root', 1 if $> == 0; + ok( !-w "$bigdir/DummyHard.pm", 'DummyHard.pm not writeable' ); + } use File::Compare; ok(compare("$bigdir/Dummy.pm", "$bigdir/DummyHard.pm"), @@ -250,7 +253,10 @@ SKIP: { }, ]); - ok( !-w "$bigdir/DummyOrig.pm", 'DummyOrig.pm not writeable' ); + SKIP: { + skip 'everywhere is writable to root', 1 if $> == 0; + ok( !-w "$bigdir/DummyOrig.pm", 'DummyOrig.pm not writeable' ); + } ok( !-l "$bigdir/Dummy.pm", 'Dummy.pm not a link' ); ok(compare("$bigdir/Dummy.pm", "$bigdir/DummyOrig.pm"), "orig file should be different"); |