X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FPlugin%2FConfigLoader%2FJSON.pm;h=1c100ce77acaf2d2bf46db3606b3c2c0890f0606;hb=f004a98a1b34eb8c14c5beb42aae9cc5c20e41d5;hp=53a356dff52e42911ab4384bcbefbfc9394b946f;hpb=a6a78be84b4a1085a2b42990379f3592fd1416c0;p=catagits%2FCatalyst-Plugin-ConfigLoader.git diff --git a/lib/Catalyst/Plugin/ConfigLoader/JSON.pm b/lib/Catalyst/Plugin/ConfigLoader/JSON.pm index 53a356d..1c100ce 100644 --- a/lib/Catalyst/Plugin/ConfigLoader/JSON.pm +++ b/lib/Catalyst/Plugin/ConfigLoader/JSON.pm @@ -15,6 +15,9 @@ Loads JSON files. Example: "name": "TestApp", "Controller::Foo": { "foo": "bar" + }, + "Model::Baz": { + "qux": "xyzzy" } } @@ -41,7 +44,7 @@ sub load { my $file = shift; open( my $fh, $file ) or die $!; - my $content; $content = do { local $/; $content = <$fh> }; + my $content = do { local $/; <$fh> }; close $fh; eval { require JSON::Syck; }; @@ -78,6 +81,10 @@ it under the same terms as Perl itself. =item * L +=item * L + +=item * L + =back =cut