#!/usr/bin/perl -w

use Test::More;

use File::Find;

my @modules;
find sub {
    return unless /\.pm$/;
    push @modules, $File::Find::name;
}, "lib";

@modules = map { s[^lib/][];  $_ =~ s[.pm$][];  $_ =~ s[/][::]g; $_ } @modules;

plan tests => scalar @modules;

# Ping::PingServer will not compile without a schema.
system "bin/jifty schema --setup";

for my $module (@modules) {
    require_ok $module;
}