if ( CheckVersion($DBversion) ) {
$dbh->do(q{
INSERT IGNORE INTO export_format( profile, description, content, csv_separator, type )
- VALUES ( "issues to claim", "efault CSV export for serial issue claims",
+ VALUES ( "issues to claim", "Default CSV export for serial issue claims",
"SUPPLIER=aqbooksellers.name|TITLE=subscription.title|ISSUE NUMBER=serial.serialseq|LATE SINCE=serial.planneddate",
",", "sql" )
});
SetVersion ($DBversion);
}
+$DBversion = "3.19.00.000";
+if ( CheckVersion($DBversion) ) {
+ print "Upgrade to $DBversion done (there's life after 3.18)\n";
+ SetVersion ($DBversion);
+}
+
=head1 FUNCTIONS
=head2 TableExists($table)