Commit | Line | Data |
479d2113 |
1 | package ExtUtils::MakeMaker::vmsish; |
2 | |
3 | use vars qw($VERSION); |
4 | $VERSION = 0.01; |
5 | |
6 | my $IsVMS = $^O eq 'VMS'; |
7 | |
8 | require vmsish if $IsVMS; |
9 | |
10 | |
11 | sub import { |
12 | return unless $IsVMS; |
13 | |
14 | shift; |
15 | unshift @_, 'vmsish'; |
16 | |
17 | goto &vmsish::import; |
18 | } |
19 | |
20 | 1; |
21 | |
22 | |
23 | =head1 NAME |
24 | |
25 | ExtUtils::MakeMaker::vmsish - Platform agnostic vmsish.pm |
26 | |
27 | =head1 SYNOPSIS |
28 | |
29 | use just like vmsish.pm |
30 | |
31 | =head1 DESCRIPTION |
32 | |
33 | Until 5.8.0, vmsish.pm is only installed on VMS. This means any code |
34 | which has 'use vmsish' in it won't even compile outside VMS. This |
35 | makes ExtUtils::MM_VMS very hard to test. |
36 | |
37 | ExtUtils::MakeMaker::vmsish is just a very thin wrapper around vmsish |
38 | which works just like it on VMS and everywhere else it does nothing. |
39 | |
40 | =cut |