1#!/usr/bin/perl -w
2# $File: //depot/libOurNet/BBS/t/6-MailBox.t $ $Author: autrijus $
3# $Revision: #1 $ $Change: 1 $ $DateTime: 2002/06/11 15:35:12 $
4
5use strict;
6use Test::More tests => 3;
7
8require_ok('OurNet::BBS');
9my $BBS = OurNet::BBS->new({
10    backend => 'MailBox',
11    bbsroot => '.'
12});
13
14isa_ok($BBS, 'OurNet::BBS');
15is(ref($BBS), $BBS->module('BBS'), 'constructor');
16
17__END__
18