- building & installing Perl modules.
| Unix.pm (Module-Build-0.4231) | : | Unix.pm (Module-Build-0.4232) |
|---|
| package Module::Build::Platform::Unix; | | package Module::Build::Platform::Unix; |
| | |
| use strict; | | use strict; |
| use warnings; | | use warnings; |
|
| our $VERSION = '0.4231'; | | our $VERSION = '0.4232'; |
| $VERSION = eval $VERSION; | | $VERSION = eval $VERSION; |
| use Module::Build::Base; | | use Module::Build::Base; |
| | |
| our @ISA = qw(Module::Build::Base); | | our @ISA = qw(Module::Build::Base); |
| | |
| sub is_executable { | | sub is_executable { |
| # We consider the owner bit to be authoritative on a file, because | | # We consider the owner bit to be authoritative on a file, because |
| # -x will always return true if the user is root and *any* | | # -x will always return true if the user is root and *any* |
| # executable bit is set. The -x test seems to try to answer the | | # executable bit is set. The -x test seems to try to answer the |
| # question "can I execute this file", but I think we want "is this | | # question "can I execute this file", but I think we want "is this |
| | | |
| End of changes. 1 change blocks. |
|---|
| 1 lines changed or deleted | | 1 lines changed or added |
|---|
"Fossies" - the Fresh Open Source Software Archive 