clusterssh/t/01l10n.t
2010-01-11 19:39:20 +00:00

15 lines
267 B
Perl

use strict;
use warnings;
use FindBin qw($Bin);
use lib "$Bin/../lib";
use Test::More tests => 2;
use Test::Trap;
BEGIN { use_ok( 'App::ClusterSSH::L10N', ) }
my $handle;
$handle = App::ClusterSSH::L10N->get_handle();
isa_ok( $handle, 'App::ClusterSSH::L10N' );