View | Details | Raw Unified | Return to bug 33214
Collapse All | Expand All

(-)a/C4/Biblio.pm (-3 / +3 lines)
Lines 1385-1391 sub GetAuthorisedValueDesc { Link Here
1385
1385
1386
        #---- branch
1386
        #---- branch
1387
        if ( $tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "branches" ) {
1387
        if ( $tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "branches" ) {
1388
            $cache_key = "LibraryNames";
1388
            $cache_key = "libraries:name";
1389
            my $libraries = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1389
            my $libraries = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1390
            if ( !$libraries ) {
1390
            if ( !$libraries ) {
1391
                $libraries = {
1391
                $libraries = {
Lines 1403-1409 sub GetAuthorisedValueDesc { Link Here
1403
        if ( $tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "itemtypes" ) {
1403
        if ( $tagslib->{$tag}->{$subfield}->{'authorised_value'} eq "itemtypes" ) {
1404
            my $lang = C4::Languages::getlanguage;
1404
            my $lang = C4::Languages::getlanguage;
1405
            $lang //= 'en';
1405
            $lang //= 'en';
1406
            $cache_key = $lang . 'ItemTypeDescriptions';
1406
            $cache_key = 'itemtype:description:' . $lang;
1407
            my $itypes = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1407
            my $itypes = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1408
            if ( !$itypes ) {
1408
            if ( !$itypes ) {
1409
                $itypes =
1409
                $itypes =
Lines 1435-1441 sub GetAuthorisedValueDesc { Link Here
1435
1435
1436
    my $dbh = C4::Context->dbh;
1436
    my $dbh = C4::Context->dbh;
1437
    if ( $category ne "" ) {
1437
    if ( $category ne "" ) {
1438
        $cache_key = "AVDescriptions-" . $category;
1438
        $cache_key = "AV_descriptions:" . $category;
1439
        my $av_descriptions = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1439
        my $av_descriptions = $cache->get_from_cache( $cache_key, { unsafe => 1 } );
1440
        if ( !$av_descriptions ) {
1440
        if ( !$av_descriptions ) {
1441
            $av_descriptions = {
1441
            $av_descriptions = {
(-)a/t/db_dependent/Koha/Filter/ExpandCodedFields.t (+5 lines)
Lines 73-78 subtest 'ExpandCodedFields tests' => sub { Link Here
73
73
74
    my $cache = Koha::Caches->get_instance;
74
    my $cache = Koha::Caches->get_instance;
75
    $cache->clear_from_cache("MarcCodedFields-");
75
    $cache->clear_from_cache("MarcCodedFields-");
76
    # Clear GetAuthorisedValueDesc-generated cache
77
    $cache->clear_from_cache("libraries:name");
78
    $cache->clear_from_cache("itemtype:description:en");
79
    $cache->clear_from_cache("cn_sources:description");
80
    $cache->clear_from_cache("AV_descriptions:LOST");
76
81
77
    C4::Biblio::ModBiblio( $record, $biblio->biblionumber );
82
    C4::Biblio::ModBiblio( $record, $biblio->biblionumber );
78
    $biblio = Koha::Biblios->find( $biblio->biblionumber);
83
    $biblio = Koha::Biblios->find( $biblio->biblionumber);
(-)a/t/db_dependent/Koha/Item.t (-1 / +1 lines)
Lines 1463-1468 subtest 'strings_map() tests' => sub { Link Here
1463
    $cache->clear_from_cache("libraries:name");
1463
    $cache->clear_from_cache("libraries:name");
1464
    $cache->clear_from_cache("itemtype:description:en");
1464
    $cache->clear_from_cache("itemtype:description:en");
1465
    $cache->clear_from_cache("cn_sources:description");
1465
    $cache->clear_from_cache("cn_sources:description");
1466
    $cache->clear_from_cache("AV_descriptions:LOST");
1466
1467
1467
    # Recreating subfields just to be sure tests will be ok
1468
    # Recreating subfields just to be sure tests will be ok
1468
    # 1 => av (LOST)
1469
    # 1 => av (LOST)
1469
- 

Return to bug 33214