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

(-)a/installer/data/mysql/updatedatabase.pl (-1 / +15 lines)
Lines 37-42 use Getopt::Long; Link Here
37
use C4::Context;
37
use C4::Context;
38
use C4::Installer;
38
use C4::Installer;
39
use C4::Dates;
39
use C4::Dates;
40
use C4::Koha qw/GetSupportList/;
40
41
41
use MARC::Record;
42
use MARC::Record;
42
use MARC::File::XML ( BinaryEncoding => 'utf8' );
43
use MARC::File::XML ( BinaryEncoding => 'utf8' );
Lines 10035-10040 if ( CheckVersion($DBversion) ) { Link Here
10035
    SetVersion ($DBversion);
10036
    SetVersion ($DBversion);
10036
}
10037
}
10037
10038
10039
$DBversion = "3.19.00.XXX";
10040
if ( CheckVersion($DBversion) ) {
10041
    foreach my $format (@{ GetSupportList() }) {
10042
        $dbh->do(
10043
            q/INSERT INTO authorised_values (category, authorised_value, lib, lib_opac, imageurl)
10044
            VALUES (?, ?, ?, ?, ?)/,
10045
            {},
10046
            'SUGGEST_FORMAT', $format->{itemtype}, $format->{description}, $format->{description}, $format->{imageurl}
10047
        );
10048
    }
10049
    print "Upgrade to $DBversion done (Bug 9468: create new SUGGEST_FORMAT authorised_value list)\n";
10050
    SetVersion($DBversion);
10051
}
10052
10038
# DEVELOPER PROCESS, search for anything to execute in the db_update directory
10053
# DEVELOPER PROCESS, search for anything to execute in the db_update directory
10039
# SEE bug 13068
10054
# SEE bug 13068
10040
# if there is anything in the atomicupdate, read and execute it.
10055
# if there is anything in the atomicupdate, read and execute it.
10041
- 

Return to bug 9468