diff options
Diffstat (limited to 't/open311/endpoint')
-rw-r--r-- | t/open311/endpoint/config1.yml | 1 | ||||
-rw-r--r-- | t/open311/endpoint/configfile.t | 23 |
2 files changed, 24 insertions, 0 deletions
diff --git a/t/open311/endpoint/config1.yml b/t/open311/endpoint/config1.yml new file mode 100644 index 000000000..c444f32c5 --- /dev/null +++ b/t/open311/endpoint/config1.yml @@ -0,0 +1 @@ +foo: baz diff --git a/t/open311/endpoint/configfile.t b/t/open311/endpoint/configfile.t new file mode 100644 index 000000000..7f41468ba --- /dev/null +++ b/t/open311/endpoint/configfile.t @@ -0,0 +1,23 @@ +use strict; use warnings; + +BEGIN { + package Foo; + use Moo; + with 'Open311::Endpoint::Role::ConfigFile'; + + has foo => ( is => 'ro', default => 'foo' ); +} + +package main; +use Test::More; + +is +Foo->new->foo, + 'foo', 'sanity'; +is +Foo->new( foo => 'bar')->foo, + 'bar', 'override'; +is +Foo->new( config_file => 't/open311/endpoint/config1.yml' )->foo, + 'baz', 'with config'; +is +Foo->new( config_file => 't/open311/endpoint/config1.yml', foo => 'qux' )->foo, + 'qux', 'with config, overridden'; + +done_testing; |