source:
trunk/essentials/dev-lang/perl/lib/ExtUtils/t/config.t
| Last change on this file was 3181, checked in by , 19 years ago | |
|---|---|
| File size: 370 bytes | |
| Line | |
|---|---|
| 1 | #!/usr/bin/perl -w |
| 2 | |
| 3 | BEGIN { |
| 4 | if( $ENV{PERL_CORE} ) { |
| 5 | chdir 't'; |
| 6 | @INC = ('../lib', 'lib/'); |
| 7 | } |
| 8 | else { |
| 9 | unshift @INC, 't/lib/'; |
| 10 | } |
| 11 | } |
| 12 | |
| 13 | use Test::More tests => 3; |
| 14 | use Config (); |
| 15 | |
| 16 | BEGIN { use_ok 'ExtUtils::MakeMaker::Config'; } |
| 17 | |
| 18 | is $Config{path_sep}, $Config::Config{path_sep}; |
| 19 | |
| 20 | eval { |
| 21 | $Config{wibble} = 42; |
| 22 | }; |
| 23 | is $Config{wibble}, 42; |
Note:
See TracBrowser
for help on using the repository browser.
