rename test
This commit is contained in:
parent
356772b722
commit
63646aa497
1 changed files with 0 additions and 0 deletions
47
t/Asset/Wobject/Survey/ResponseJSON.t
Normal file
47
t/Asset/Wobject/Survey/ResponseJSON.t
Normal file
|
|
@ -0,0 +1,47 @@
|
|||
# Tests WebGUI::Asset::Wobject::Survey
|
||||
#
|
||||
#
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
use FindBin;
|
||||
use lib "$FindBin::Bin/../../../lib";
|
||||
use Test::More;
|
||||
use Test::Deep;
|
||||
use Data::Dumper;
|
||||
use WebGUI::Test; # Must use this before any other WebGUI modules
|
||||
use WebGUI::Session;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Init
|
||||
my $session = WebGUI::Test->session;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Tests
|
||||
my $tests = 1;
|
||||
plan tests => $tests + 1;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# put your tests here
|
||||
|
||||
my $usedOk = use_ok('WebGUI::Asset::Wobject::Survey::ResponseJSON');
|
||||
my ($responseJSON);
|
||||
|
||||
SKIP: {
|
||||
|
||||
skip $tests, "Unable to load ResponseJSON" unless $usedOk;
|
||||
|
||||
####################################################
|
||||
#
|
||||
# new, part 1
|
||||
#
|
||||
####################################################
|
||||
|
||||
$responseJSON = WebGUI::Asset::Wobject::Survey::ResponseJSON->new('{}', $session->log);
|
||||
isa_ok($responseJSON , 'WebGUI::Asset::Wobject::Survey::ResponseJSON');
|
||||
|
||||
}
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# Cleanup
|
||||
END { }
|
||||
Loading…
Add table
Add a link
Reference in a new issue