#!/usr/bin/perl
# ==============================================================================
#
# Eidolon
# Copyright (c) 2009, Atma 7
# ---
# t/main.t - consequent router driver tests
#
# ==============================================================================
use Test::More tests => 6;
use warnings;
use strict;
# ------------------------------------------------------------------------------
# BEGIN()
# test initialization
# ------------------------------------------------------------------------------
BEGIN
{
use_ok("Eidolon::Driver::Exceptions");
use_ok("Eidolon::Driver::Router");
use_ok("Eidolon::Driver::Router::Consequent");
}
# methods
ok( Eidolon::Driver::Router::Consequent->can("find_handler"), "find_handler method" );
ok( Eidolon::Driver::Router::Consequent->can("get_handler"), "get_handler method" );
ok( Eidolon::Driver::Router::Consequent->can("get_params"), "get_params method" );