fix ConfigLoader
[catagits/Catalyst-Plugin-ConfigLoader.git] / lib / Catalyst / Plugin / ConfigLoader / JSON.pm
index 3a187d1..a820535 100644 (file)
@@ -3,8 +3,6 @@ package Catalyst::Plugin::ConfigLoader::JSON;
 use strict;\r
 use warnings;\r
 \r
-#use File::Slurp;    \r
-\r
 =head1 NAME\r
 \r
 Catalyst::Plugin::ConfigLoader::JSON - Load JSON config files\r
@@ -42,7 +40,10 @@ sub load {
     my $class = shift;\r
     my $file  = shift;\r
 \r
-    my $content = read_file( $file );\r
+    my $content;\r
+    open(my $fh, $file) or die $!;\r
+    { local $/; $content = <$fh> }\r
+    close $fh;\r
 \r
     eval { require JSON::Syck; };\r
     if( $@ ) {\r