Bug 19043: (QA follow-up) Add update DB entry and print warning

This follow-up takes care of the requested warning at upgrade time.
At the same time it removes the obsolete Columbia record when host and
port are equal to the formerly used values. Note that the new host for
on-campus use has been changed.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Marcel de Rooy 2017-10-09 12:51:34 +02:00 committed by Jonathan Druart
parent 7f6f98e00c
commit ecc5daaceb

View file

@ -0,0 +1,13 @@
$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";
}