LP 1673971: Little more README cleanup.
[working/NCIPServer.git] / t / NCIP_Configuration.t
index bba7fce..99fda20 100644 (file)
 
 use strict;
 use warnings;
 
 use strict;
 use warnings;
+use Sys::Syslog;
+use lib 'lib';
 
 
-use Test::More tests => 4;    # last test to print
+use Test::More tests => 5;    # last test to print
 
 use_ok('NCIP::Configuration');
 
 
 use_ok('NCIP::Configuration');
 
-ok( my $config = NCIP::Configuration->new('../t/config_sample'),
+ok( my $config = NCIP::Configuration->new('t/config_sample'),
     'Creating a config object' );
 
 # because the file is called NCIP.xml we now have that namespace
     'Creating a config object' );
 
 # because the file is called NCIP.xml we now have that namespace
@@ -30,3 +32,5 @@ ok( my $server_params = $config->('NCIP.server-params'), 'Get server-params' );
 
 is( $server_params->{'min_servers'}, 1, 'Do we have a minimum of one server' );
 
 
 is( $server_params->{'min_servers'}, 1, 'Do we have a minimum of one server' );
 
+ok ($config->find_service('127.0.0.1','6001','tcp'),'Testing find_service');
+