use t::lib::Mocks;
use C4::Context;
+use Koha::Database;
BEGIN {
use_ok('C4::Auth_with_cas');
/);
}
-my $dbh = C4::Context->dbh;
-# Start transaction
-$dbh->{ AutoCommit } = 0;
-$dbh->{ RaiseError } = 1;
+my $schema = Koha::Database->new->schema;
+$schema->storage->txn_begin;
C4::Context->disable_syspref_cache();
t::lib::Mocks::mock_preference('OPACBaseURL','http://localhost');
$ENV{QUERY_STRING} = $query_string;
$ENV{SCRIPT_NAME} = '/cgi-bin/koha/opac-user.pl';
-my $cgi = new CGI($query_string);
+my $cgi = CGI->new($query_string);
$cgi->delete('ticket');
# _url_with_get_params tests
"$opac_base_url/cgi-bin/koha/opac-user.pl?bar=baz",
"_url_with_get_params should return URL without deleted parameters (Bug 12398)");
+$ENV{SCRIPT_NAME} = '/cgi-bin/koha/circ/circulation-home.pl';
# intranet url test
is(C4::Auth_with_cas::_url_with_get_params($cgi, 'intranet'),
- "$staff_base_url?bar=baz",
+ "$staff_base_url/cgi-bin/koha/circ/circulation-home.pl?bar=baz",
"Intranet URL should be returned when using intranet login (Bug 13507)");
-
-
-
-$dbh->rollback;
-