File: 07_rt91891.t

package info (click to toggle)
libconfig-auto-perl 0.44-2
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 164 kB
  • sloc: perl: 397; makefile: 2
file content (22 lines) | stat: -rw-r--r-- 430 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
use strict;
use warnings;
use Config::Auto;
use File::Spec;
use Test::More 'no_plan';

BEGIN { chdir 't' if -d 't'; }

my $expecting = {
  'SOME_SETTING' => [
    '/a/b/c '
  ],
};

my $ca = Config::Auto->new(
  source => File::Spec->catfile( 'src', '07_rt91891.conf' ),
);

my $config = $ca->parse;
ok( $config, 'Got config' );
is( ref($config), 'HASH', 'Got hash' );
is_deeply( $config, $expecting, 'It looks like it should' );