# - #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 = "17.06.00.011";
+$VERSION = "17.06.00.012";
sub version {
return $VERSION;
+++ /dev/null
-$DBversion = 'XXX'; # will be replaced by the RM
-if( CheckVersion( $DBversion ) ) {
- my $where = q|host='clio-db.cc.columbia.edu' AND port=7090|;
- my $sql = "SELECT COUNT(*) FROM z3950servers WHERE $where";
- my ( $cnt ) = $dbh->selectrow_array( $sql );
- if( $cnt ) {
- $dbh->do( "DELETE FROM z3950servers WHERE $where" );
- print "Removed $cnt Z39.50 target(s) for Columbia University\n";
- }
-
- SetVersion( $DBversion );
- print "Upgrade to $DBversion done (Bug 19043 - Z39.50 target for Columbia University is no longer publicly available.)\n";
-}
print "Upgrade to $DBversion done (Bug 13766 - Make ean mediumtext and add ean indexes)\n";
}
+$DBversion = '17.06.00.012';
+if( CheckVersion( $DBversion ) ) {
+ my $where = q|host='clio-db.cc.columbia.edu' AND port=7090|;
+ my $sql = "SELECT COUNT(*) FROM z3950servers WHERE $where";
+ my ( $cnt ) = $dbh->selectrow_array( $sql );
+ if( $cnt ) {
+ $dbh->do( "DELETE FROM z3950servers WHERE $where" );
+ print "Removed $cnt Z39.50 target(s) for Columbia University\n";
+ }
+
+ SetVersion( $DBversion );
+ print "Upgrade to $DBversion done (Bug 19043 - Z39.50 target for Columbia University is no longer publicly available.)\n";
+}
+
# DEVELOPER PROCESS, search for anything to execute in the db_update directory
# SEE bug 13068
# if there is anything in the atomicupdate, read and execute it.