|
Lines 32-37
use C4::Languages;
Link Here
|
| 32 |
use C4::Branch; # GetBranches |
32 |
use C4::Branch; # GetBranches |
| 33 |
use C4::Search::History; |
33 |
use C4::Search::History; |
| 34 |
use Koha; |
34 |
use Koha; |
|
|
35 |
use Koha::Caches; |
| 35 |
use Koha::AuthUtils qw(hash_password); |
36 |
use Koha::AuthUtils qw(hash_password); |
| 36 |
use Koha::LibraryCategories; |
37 |
use Koha::LibraryCategories; |
| 37 |
use Koha::Libraries; |
38 |
use Koha::Libraries; |
|
Lines 1725-1731
sub get_session {
Link Here
|
| 1725 |
elsif ( $storage_method eq 'Pg' ) { |
1726 |
elsif ( $storage_method eq 'Pg' ) { |
| 1726 |
$session = new CGI::Session( "driver:PostgreSQL;serializer:yaml;id:md5", $sessionID, { Handle => $dbh } ); |
1727 |
$session = new CGI::Session( "driver:PostgreSQL;serializer:yaml;id:md5", $sessionID, { Handle => $dbh } ); |
| 1727 |
} |
1728 |
} |
| 1728 |
elsif ( $storage_method eq 'memcached' && C4::Context->ismemcached ) { |
1729 |
elsif ( $storage_method eq 'memcached' && Koha::Caches->get_instance->memcached_cache ) { |
| 1729 |
$session = new CGI::Session( "driver:memcached;serializer:yaml;id:md5", $sessionID, { Memcached => C4::Context->memcached } ); |
1730 |
$session = new CGI::Session( "driver:memcached;serializer:yaml;id:md5", $sessionID, { Memcached => C4::Context->memcached } ); |
| 1730 |
} |
1731 |
} |
| 1731 |
else { |
1732 |
else { |