VRac/t/05-session.t

#!/usr/bin/perl

use warnings;
use strict;

use blib;
use lib './lib';

use Test::More tests => 18;
#use Data::Dump qw/dump/;
#use File::Slurp;

BEGIN {
use_ok( 'Session' );
}

ok( my $session = Session->new(), 'new' );

isa_ok( $session, 'Session' );

my $path = 'session.pl';

ok( $session->load_session( $path ), 'load_session' );
1	dpavlin	146	#!/usr/bin/perl
2
3			use warnings;
4			use strict;
5
6			use blib;
7			use lib './lib';
8
9			use Test::More tests => 18;
10			#use Data::Dump qw/dump/;
11			#use File::Slurp;
12
13			BEGIN {
14			use_ok( 'Session' );
15			}
16
17			ok( my $session = Session->new(), 'new' );
18
19			isa_ok( $session, 'Session' );
20
21			my $path = 'session.pl';
22
23			ok( $session->load_session( $path ), 'load_session' );