SetVersion ($DBversion);
}
-$DBversion = "XXX";
-if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
+$DBversion = "3.15.00.001";
+if ( CheckVersion($DBversion) ) {
$dbh->do("UPDATE systempreferences SET value='clear' where variable = 'CircAutoPrintQuickSlip' and value = '0'");
$dbh->do("UPDATE systempreferences SET value='qslip' where variable = 'CircAutoPrintQuickSlip' and value = '1'");
$dbh->do("UPDATE systempreferences SET explanation = 'Choose what should happen when an empty barcode field is submitted in circulation: Display a print quick slip window, Display a print slip window or Clear the screen.', type = 'Choice' where variable = 'CircAutoPrintQuickSlip'");
- print "Upgrade to $DBversion done (Bug 11040: Add option to print full slip when checking out a null barcode)";
+ print "Upgrade to $DBversion done (Bug 11040: Add option to print full slip when checking out a null barcode)\n";
SetVersion($DBversion);
}
use strict;
sub kohaversion {
- our $VERSION = '3.15.00.000';
+ our $VERSION = '3.15.00.001';
# version needs to be set this way
# so that it can be picked up by Makefile.PL
# during install