Change DANCER_CONFIG_READERS separator

Author: mikkoi

lib/Dancer2/ConfigReader.pm

@@ -98,7 +98,7 @@ sub _build_config_readers {
     my ($self) = @_;
 
     my @config_reader_names = $ENV{'DANCER_CONFIG_READERS'}
-                            ? (split qr{ \s+ }msx, $ENV{'DANCER_CONFIG_READERS'})
+                            ? (split qr{,}msx, $ENV{'DANCER_CONFIG_READERS'})
                             : ( q{Dancer2::ConfigReader::File::Simple} );
 
     warn "ConfigReaders to use: @config_reader_names\n" if $ENV{DANCER_CONFIG_VERBOSE};
@@ -129,9 +129,9 @@ class or classes to use to create the config.
 Use C<DANCER_CONFIG_READERS> environment variable to define
 which class or classes you want.
 
-    DANCER_CONFIG_READERS='Dancer2::ConfigReader::File::Simple Dancer2::ConfigReader::CustomConfig'
+    DANCER_CONFIG_READERS='Dancer2::ConfigReader::File::Simple,Dancer2::ConfigReader::CustomConfig'
 
-If you want several, separate them with whitespace.
+If you want several, separate them with a comma (",").
 Configs are added in left-to-write order where the previous
 config items get overwritten by subsequent ones.
 

t/config_many.t

@@ -9,7 +9,7 @@ BEGIN {
     local $ENV{DANCER_ENVIRONMENT};
     local $ENV{PLACK_ENV};
     $ENV{DANCER_CONFIG_READERS}
-        = 'Dancer2::ConfigReader::File::Simple Dancer2::ConfigReader::TestDummy';
+        = 'Dancer2::ConfigReader::File::Simple,Dancer2::ConfigReader::TestDummy';
 }
 use lib '.';
 use lib './t/lib';

t/config_many_failure.t

@@ -0,0 +1,25 @@
+use strict;
+use warnings;
+
+use Test::More;
+use File::Spec;
+use English;
+
+BEGIN {
+    # undefine ENV vars used as defaults for app environment in these tests
+    local $ENV{DANCER_ENVIRONMENT};
+    local $ENV{PLACK_ENV};
+    $ENV{DANCER_CONFIG_READERS}
+        = 'Dancer2::ConfigReader::File::Simple Dancer2::ConfigReader::TestDummy';
+}
+
+use lib q{.};
+use lib './t/lib';
+
+local $EVAL_ERROR = undef;
+my $eval_r = eval 'use t::app::t1::lib::App1;';
+my $eval_e = $EVAL_ERROR;
+is $eval_r, undef, 'Eval failed correctly';
+like $eval_e, qr{`Dancer2::ConfigReader::File::Simple Dancer2::ConfigReader::TestDummy' is not a module name}, 'Correct dying and error';
+
+done_testing;