--- a/t/autodia.t +++ b/t/autodia.t @@ -22,11 +22,18 @@ warn "checking handlers..\n"; -foreach ( qw/SQL Cpp Perl PHP DBI dia Torque python umbrello/ ) { +foreach ( qw/SQL Cpp Perl PHP dia Torque python umbrello/ ) { eval " require_ok('Autodia::Handler::$_') ; "; warn "couldn't compile Autodia::Handler::$_ : $@ : ignoring..\n" if $@; } +if (eval "require DBI;" ) { + eval " require_ok('Autodia::Handler::DBI') ; "; + warn "couldn't compile Autodia::Handler::DBI : $@ : ignoring..\n" if $@; +} else { + note('skipping Autodia::Handler::DBI - DBI not installed') +} + if (eval "require HTML::Mason;" ) { eval " require_ok('Autodia::Handler::Mason') ; "; warn "couldn't compile Autodia::Handler::Mason : $@ : ignoring..\n" if $@;