Improve test coverage

This commit is contained in:
Duncan Ferguson 2014-07-04 21:41:52 +01:00
parent 3e2392e9b6
commit c6747288d5
7 changed files with 418 additions and 108 deletions

View file

@ -22,7 +22,7 @@ sub new {
sub script {
my ( $self, $config ) = @_;
if(! defined $config || ref $config ne "HASH") {
if(! defined $config || ! ref $config || ref $config ne "App::ClusterSSH::Config") {
croak(
App::ClusterSSH::Exception::Helper->throw(
error => 'No configuration provided or in wrong format',