Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
# - #4 : the developer version. The 4th number is the database subversion.
# used by developers when the database changes. updatedatabase take care of the changes itself
# and is automatically called by Auth.pm when needed.
-$VERSION = "18.12.00.059";
+$VERSION = "18.12.00.060";
sub version {
return $VERSION;
+++ /dev/null
-$DBversion = 'XXX'; # will be replaced by the RM
-if ( CheckVersion($DBversion) ) {
-
- my $rows = $dbh->do(
- qq{
- UPDATE `accountlines`
- SET
- `accounttype` = 'L',
- `status` = 'REPLACED'
- WHERE
- `accounttype` = 'Rep'
- }
- );
-
- SetVersion($DBversion);
- printf "Upgrade to $DBversion done (Bug 22564 - Fix accounttype 'Rep' - %d updated)\n", $rows;
-}
print "Upgrade to $DBversion done (Bug 22532 - Remove import_records z3950random column)\n";
}
+$DBversion = '18.12.00.060';
+if ( CheckVersion($DBversion) ) {
+
+ my $rows = $dbh->do(
+ qq{
+ UPDATE `accountlines`
+ SET
+ `accounttype` = 'L',
+ `status` = 'REPLACED'
+ WHERE
+ `accounttype` = 'Rep'
+ }
+ );
+
+ SetVersion($DBversion);
+ printf "Upgrade to $DBversion done (Bug 22564 - Fix accounttype 'Rep' - %d updated)\n", $rows;
+}
+
# SEE bug 13068
# if there is anything in the atomicupdate, read and execute it.