Commit | Line | Data |
b965d173 |
1 | #!/usr/bin/perl -w |
2 | |
3 | BEGIN { |
5e2a19fc |
4 | if ( $ENV{PERL_CORE} ) { |
5 | chdir 't'; |
6 | @INC = ( '../lib', 'lib' ); |
7 | } |
8 | else { |
9 | unshift @INC, 't/lib'; |
b965d173 |
10 | } |
11 | } |
12 | |
13 | use strict; |
14 | use lib 't/lib'; |
15 | use Test::More tests => 1; |
16 | use File::Spec; |
17 | use App::Prove; |
18 | |
19 | my $prove = App::Prove->new; |
20 | |
5e2a19fc |
21 | $prove->add_rc_file( |
22 | File::Spec->catfile( |
23 | ( $ENV{PERL_CORE} ? 'lib' : 't' ), 'data', 'proverc' |
24 | ) |
25 | ); |
b965d173 |
26 | |
27 | is_deeply $prove->{rc_opts}, |
28 | [ '--should', 'be', '--split', 'correctly', 'Can', 'quote things', |
5e2a19fc |
29 | 'using single or', 'double quotes', '--this', 'is', 'OK?' |
30 | ], |
b965d173 |
31 | 'options parsed'; |
32 | |