# vim: set ft=perl :

use strict;
use warnings;

use Test::More tests => 8;

use_ok('Java::JCR');
use_ok('Java::JCR::Jackrabbit');

use Java::JCR;

my $repository = Java::JCR::Jackrabbit->new;
ok($repository);
isa_ok($repository, 'Java::JCR::Repository');

my $session = $repository->login;
ok($session);
isa_ok($session, 'Java::JCR::Session');

my $user = $session->get_user_id;
is($user, 'anonymous');

my $name = $repository->get_descriptor($Java::JCR::Repository::REP_NAME_DESC);
is($name, 'Jackrabbit');

$session->logout;