X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FConf.pm;h=ea2785bdf0793abc8ebf1656c3929f5cd327b23b;hb=df185d34f354c5788e8c4693182b7689a3333839;hp=15ac23d532d7f839f0117c8e10d09e5f52319e3d;hpb=3081639bd119c6d281ef23139649b2e73ba62754;p=freeside.git

diff --git a/FS/FS/Conf.pm b/FS/FS/Conf.pm
index 15ac23d53..ea2785bdf 100644
--- a/FS/FS/Conf.pm
+++ b/FS/FS/Conf.pm
@@ -95,6 +95,21 @@ sub config {
   }
 }
 
+=item config_binary KEY
+
+Returns the exact scalar value for key.
+
+=cut
+
+sub config_binary {
+  my($self,$file)=@_;
+  my($dir)=$self->dir;
+  my $fh = new IO::File "<$dir/$file" or return;
+  local $/;
+  my $content = <$fh>;
+  $content;
+}
+
 =item exists KEY
 
 Returns true if the specified key exists, even if the corresponding value