Adding base test for Inbox.pm

This commit is contained in:
Diona Kidd 2007-09-13 04:07:35 +00:00
parent b16d9829c6
commit 6ce211e805

26
t/Inbox.t Normal file
View file

@ -0,0 +1,26 @@
#-------------------------------------------------------------------
# WebGUI is Copyright 2001-2006 Plain Black Corporation.
#-------------------------------------------------------------------
# Please read the legal notices (docs/legal.txt) and the license
# (docs/license.txt) that came with this distribution before using
# this software.
#-------------------------------------------------------------------
# http://www.plainblack.com info@plainblack.com
#-------------------------------------------------------------------
use FindBin;
use strict;
use lib "$FindBin::Bin/lib";
use WebGUI::Test;
use WebGUI::Session;
use WebGUI::Inbox;
use Test::More tests => 1; # increment this value for each test you create
my $session = WebGUI::Test->session;
# Begin tests...
my $inbox = WebGUI::Inbox->new($session);
ok(defined ($inbox), 'new("new") -- object reference is defined');