Line 0
Link Here
|
|
|
1 |
$DBversion = '19.06.00.XXX'; # will be replaced by the RM |
2 |
if( CheckVersion( $DBversion ) ) { |
3 |
# you can use $dbh here like: |
4 |
$dbh->do( q{ |
5 |
INSERT IGNORE INTO systempreferences (variable,value,explanation,type) VALUES |
6 |
('MaxTotalSuggestions','3','Number of total suggestions','free'), |
7 |
('NumberOfSuggestionDays','30','days','free') |
8 |
}); |
9 |
|
10 |
# or perform some test and warn |
11 |
# if( !column_exists( 'biblio', 'biblionumber' ) ) { |
12 |
# warn "There is something wrong"; |
13 |
# } |
14 |
|
15 |
# Always end with this (adjust the bug info) |
16 |
SetVersion( $DBversion ); |
17 |
print "Upgrade to $DBversion done (Bug 22774 - Limit Purchase Suggestion in a specified Time period)\n"; |
18 |
} |