package Platform::Apache;
use strict;
use warnings;
use Platform::DBI;
use Apache2::ServerUtil ();
use Apache2::Const -compile => qw(OK DECLINED HTTP_UNAUTHORIZED);
use YAML::XS;
use Data::Dumper;

sub child_init_handler {
  my ($class, $pool, $s) = @_;
  my $server_root = Apache2::ServerUtil::server_root();
  my $path = File::Spec->catfile($server_root, 'conf', $s->dir_config('configuration'));

  Platform->configure($path);
  
  return Apache2::Const::OK ;
}

1;
