#!/usr/bin/perl -w
use strict;
use warnings;
use lib qw(t/lib);
use Test::More tests => 1;
use UnoTest;
my ($pu, $smgr) = get_service_manager();
my $rc = $smgr->getPropertyValue("DefaultContext");
ok( 1, 'Got there' );
#!/usr/bin/perl -w
use strict;
use warnings;
use lib qw(t/lib);
use Test::More tests => 1;
use UnoTest;
my ($pu, $smgr) = get_service_manager();
my $rc = $smgr->getPropertyValue("DefaultContext");
ok( 1, 'Got there' );