[Koha-cvs] koha/updater updatedatabase [rel_3_0]

[Antoine Farnault]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	Antoine Farnault <toins>	06/11/20 16:59:09

Modified files:
	updater        : updatedatabase 

Log message:
	adding a userflags: 'editauthorities'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/updater/updatedatabase?cvsroot=koha&only_with_tag=rel_3_0&r1=1.157.2.21&r2=1.157.2.22

Patches:
Index: updatedatabase
===================================================================
RCS file: /sources/koha/koha/updater/updatedatabase,v
retrieving revision 1.157.2.21
retrieving revision 1.157.2.22
diff -u -b -r1.157.2.21 -r1.157.2.22
--- updatedatabase	17 Nov 2006 10:53:04 -0000	1.157.2.21
+++ updatedatabase	20 Nov 2006 16:59:09 -0000	1.157.2.22
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: updatedatabase,v 1.157.2.21 2006/11/17 10:53:04 hdl Exp $
+# $Id: updatedatabase,v 1.157.2.22 2006/11/20 16:59:09 toins Exp $
 
 # Database Updater
 # This script checks for required updates to the database.
@@ -355,7 +355,15 @@
             type                => 'Free',
         },
     ],
-
+	userflags => [
+		{
+			uniquefieldrequired => 'bit',
+			bit			        => '14',
+			flag		        => 'editauthorities',
+			flagdesc            => 'allow to edit authorities',
+			defaulton           => '0',
+		},
+	],
 );
 
 my %fielddefinitions = (
@@ -1560,6 +1568,7 @@
 			print "\n" unless $silent;
 			$fieldlist    =~ s/,$//;
 			$placeholders =~ s/,$//;
+			print "insert into $table ($fieldlist) values ($placeholders)";
 			my $sth =
 			$dbh->prepare(
 				"insert into $table ($fieldlist) values ($placeholders)");
@@ -1689,8 +1698,8 @@
 while ( ( $column, $type, $null, $key, $default, $extra ) = $sth->fetchrow ){
 	$marcdone=1 if ($type eq 'longtext' && $column eq 'marcxml') ;
 }
-#unless ($marcdone) {
-unless (1) { # to disable this block just to test.
+unless ($marcdone) {
+#unless (1) { # to disable this block just to test.
 	print "moving MARC record to biblioitems table\n";
 	# changing marc field type
 	$dbh->do('ALTER TABLE `biblioitems` CHANGE `marc` `marc` BLOB NULL DEFAULT NULL ');
@@ -1936,6 +1945,9 @@
 exit;
 
 # $Log: updatedatabase,v $
+# Revision 1.157.2.22  2006/11/20 16:59:09  toins
+# adding a userflags: 'editauthorities'.
+#
 # Revision 1.157.2.21  2006/11/17 10:53:04  hdl
 # Changing
 # - subscription detail :