[Koha-cvs] CVS: koha/updater updatedatabase,1.71,1.72

[Paul POULAIN]

Update of /cvsroot/koha/koha/updater
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24479/updater

Modified Files:
	updatedatabase 
Log Message:
synch'ing 2.0.0 branch (RC4 tag) and head

Index: updatedatabase
===================================================================
RCS file: /cvsroot/koha/koha/updater/updatedatabase,v
retrieving revision 1.71
retrieving revision 1.72
diff -C2 -r1.71 -r1.72
*** updatedatabase	18 Dec 2003 17:23:22 -0000	1.71
--- updatedatabase	11 Feb 2004 08:44:29 -0000	1.72
***************
*** 857,860 ****
--- 857,875 ----
  $dbh->do('create fulltext index category_2 on bibliothesaurus (category,freelib)') unless $exists;
  
+ #
+ # creating  index in z3950results if needed
+ #
+ $sth = $dbh->prepare("show index from z3950results");
+ $sth->execute;
+ my $exists=0;
+ while ( my ( $table, $non_unique, $key_name, $Seq_in_index, $Column_name, $Collation, $cardinality, $sub_part, $Packed, $comment ) = $sth->fetchrow )
+ {
+ 	if ($key_name eq 'query_server') {
+ 		$exists=1;
+ 	}
+ }
+ print "Creating  index on z3950results\n" unless $exists;
+ $dbh->do('create unique index query_server on z3950results (queryid,server)') unless $exists;
+ 
  # changing z3950daemon field to NULL in marc_breeding
  $dbh->do("ALTER TABLE `marc_breeding` CHANGE `z3950random` `z3950random` VARCHAR( 40 )");
***************
*** 982,986 ****
  
  # $Log$
! # Revision 1.71  2003/12/18 17:23:22  tipaul
  # fix for 625
  #
--- 997,1007 ----
  
  # $Log$
! # Revision 1.72  2004/02/11 08:44:29  tipaul
! # synch'ing 2.0.0 branch (RC4 tag) and head
! #
! # Revision 1.70.2.2  2004/01/20 09:46:53  tipaul
! # new index in z3950results table
! #
! # Revision 1.70.2.1  2003/12/18 17:22:24  tipaul
  # fix for 625
  #