File: 10fixbools.t

package info (click to toggle)
libconfig-apacheformat-perl 1.2-4
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, lenny, squeeze, wheezy
  • size: 828 kB
  • ctags: 19
  • sloc: perl: 408; makefile: 45
file content (15 lines) | stat: -rwxr-xr-x 396 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 

use Test::More tests => 7;
BEGIN { use_ok 'Config::ApacheFormat'; }

my $config = Config::ApacheFormat->new(fix_booleans => 1);
$config->read("t/fixbools.conf");

is($config->get('usecanonicalname'), 1);
is($config->get('haveprettyflowers'), 1);
is($config->get('likesalads'), 1);

is($config->get('actlikeanimals'), 0);
is($config->get('killfluffy'), 0);
is($config->get('dislikesalads'), 0);