| Subject: | [PATCH] for VMS to get 01_module_load_conditional.t to pass. |
Hello and thank you for Module::Load::Conditional 0.26.
Just a small change was required to get the
01_module_load_conditional.t
to pass it's tests on VMS.
01_module_load_conditional.t
24c24
< use lib "$FindBin::Bin/to_load";
---
Show quoted text
> use lib File::Spec->catdir($FindBin::Bin,'to_load');
Without this the @INC had this as it's first entry:
<removed>module-load-conditional-0_26.t]/to_load
with the change this is now valid VMS syntax for a directory:
<removed>module-load-conditional-0_26.t.to_load]
Cheers,
Peter (Stig) Edwards
Just FYI the failing tests looked like this:
ok 1 - use Module::Load::Conditional;
ok 2 - Verify self
ok 3 - Found proper version
ok 4 - Found proper file
ok 5 - Verify out of date module
ok 6 - Verify any module
ok 7 - Verify non-existant module
not ok 8 - Testing $VERSION in POD
# Failed test 'Testing $VERSION in POD'
# at [.t]01_module_load_conditional.t line 111.
not ok 9 - Version found
# Failed test ' Version found'
# at [.t]01_module_load_conditional.t line 112.
not ok 10 - Version is correct
# Failed test ' Version is correct'
# at [.t]01_module_load_conditional.t line 113.
# got: undef
# expected: '2'
ok 11 - Checking beta versions
ok 12 - Beta version is higher
ok 13 - Testing $FIND_VERSION
ok 14 - No version info returned
ok 15 - Module marked as uptodate
not ok 16 - Load simple module
# Failed test 'Load simple module'
# at [.t]01_module_load_conditional.t line 150.
not ok 17 - Load module with a second, commented-out $VERSION
# Failed test 'Load module with a second, commented-out $VERSION'
# at [.t]01_module_load_conditional.t line 157.
ok 18 - Detect out of date module
ok 19 - Do not load if one prerequisite fails
ok 20 - Detecting requirements
ok 21 - Found package in %INC
ok 22 - Found correct file
ok 23 - Found correct version
ok 24 - Marked as uptodate
ok 25 - can_load successful
1..25