The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
#!/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"   );