use Test::More;
use strict;
use Data::Dumper;
require 't/test-lib.pm';
my $res;
my $client = LLNG::Manager::Test->new( {
ini => {
logLevel => 'error',
useSafeJail => 1,
authentication => 'Null',
userDB => 'Same',
scrollTop => 100
}
}
);
ok( $res = $client->_get( '/', accept => 'text/html' ), 'Auth query' );
ok( $res->[2]->[0] =~ m%"scrollTop":100%, 'scrollTop param found' )
or print STDERR Dumper( $res->[2]->[0] );
ok( $res->[2]->[0] =~ m%id="btn-back-to-top"%, 'scrollTop button found' )
or print STDERR Dumper( $res->[2]->[0] );
count(3);
expectOK($res);
my $id = expectCookie($res);
ok( $res = $client->_get( '/lmerror/403', accept => 'text/html' ),
'lmerror 403 query' );
expectOK($res);
ok( $res->[2]->[0] =~ qq%[2]->[0] );
ok( $res->[2]->[0] =~ m%%, 'Language icons found' )
or print STDERR Dumper( $res->[2]->[0] );
count(3);
ok(
$res = $client->_get(
'/logout', accept => 'text/html'
),
'Get logout page'
);
ok( $res->[2]->[0] =~ m%%, ' PE_LOGOUT_OK' )
or print STDERR Dumper( $res->[2]->[0] );
count(2);
clean_sessions();
done_testing( count() );