|
Lines 7146-7152
if ( CheckVersion($DBversion) ) {
Link Here
|
| 7146 |
SetVersion($DBversion); |
7146 |
SetVersion($DBversion); |
| 7147 |
} |
7147 |
} |
| 7148 |
|
7148 |
|
| 7149 |
|
|
|
| 7150 |
$DBversion = "3.13.00.022"; |
7149 |
$DBversion = "3.13.00.022"; |
| 7151 |
if ( CheckVersion($DBversion) ) { |
7150 |
if ( CheckVersion($DBversion) ) { |
| 7152 |
$dbh->do("DELETE from auth_tag_structure WHERE tagfield IN ('68a','68b')"); |
7151 |
$dbh->do("DELETE from auth_tag_structure WHERE tagfield IN ('68a','68b')"); |
|
Lines 7155-7160
if ( CheckVersion($DBversion) ) {
Link Here
|
| 7155 |
SetVersion($DBversion); |
7154 |
SetVersion($DBversion); |
| 7156 |
} |
7155 |
} |
| 7157 |
|
7156 |
|
|
|
7157 |
$DBversion = "3.13.00.XXX"; |
| 7158 |
if ( CheckVersion($DBversion) ) { |
| 7159 |
if ( C4::Context->preference("marcflavour") eq 'MARC21' ) { |
| 7160 |
$dbh->do("INSERT INTO marc_matchers (code, description, record_type, threshold) VALUES ('KohaBiblio', '999$c', 'biblio', 1000)"); |
| 7161 |
$dbh->do("INSERT INTO matchpoints (matcher_id, search_index, score) SELECT MAX(matcher_id), 'Local-Number', 1000 FROM marc_matchers"); |
| 7162 |
$dbh->do("INSERT INTO matcher_matchpoints SELECT MAX(matcher_id), MAX(matchpoint_id) FROM matchpoints"); |
| 7163 |
$dbh->do("INSERT INTO matchpoint_components (matchpoint_id, sequence, tag, subfields) SELECT MAX(matchpoint_id), 1, '999', 'c' FROM matchpoints"); |
| 7164 |
$dbh->do("INSERT INTO matchpoint_component_norms (matchpoint_component_id, sequence, norm_routine) SELECT MAX(matchpoint_component_id), 1, 'Biblionumber' FROM matchpoint_components"); |
| 7165 |
} |
| 7166 |
print "Upgrade to $DBversion done (Bug 10811: Add a 999$c record matching rule to the MARC21 defaults)\n"; |
| 7167 |
SetVersion($DBversion); |
| 7168 |
} |
| 7169 |
|
| 7158 |
=head1 FUNCTIONS |
7170 |
=head1 FUNCTIONS |
| 7159 |
|
7171 |
|
| 7160 |
=head2 TableExists($table) |
7172 |
=head2 TableExists($table) |
| 7161 |
- |
|
|