1 package CPANPLUS::Dist::Build::Constants;
10 use vars qw[$VERSION @ISA @EXPORT];
14 @EXPORT = qw[ BUILD_DIR BUILD ];
18 use constant BUILD_DIR => sub { return @_
19 ? File::Spec->catdir($_[0], '_build')
22 use constant BUILD => sub { my $file = @_
23 ? File::Spec->catfile($_[0], 'Build')
26 ### on VMS, '.com' is appended when
27 ### creating the Build file
28 $file .= '.com' if $^O eq 'VMS';
37 CPANPLUS::Dist::Build::Constants - Constants for CPANPLUS::Dist::Build
41 use CPANPLUS::Dist::Build::Constants;
45 CPANPLUS::Dist::Build::Constants provides some constants required by L<CPANPLUS::Dist::Build>.
49 Originally by Jos Boumans E<lt>kane@cpan.orgE<gt>. Brought to working
50 condition and currently maintained by Ken Williams E<lt>kwilliams@cpan.orgE<gt>.
54 The CPAN++ interface (of which this module is a part of) is
55 copyright (c) 2001, 2002, 2003, 2004, 2005 Jos Boumans E<lt>kane@cpan.orgE<gt>.
58 This library is free software;
59 you may redistribute and/or modify it under the same
65 # c-indentation-style: bsd
67 # indent-tabs-mode: nil
69 # vim: expandtab shiftwidth=4: