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

paul poulain paul at koha-fr.org
Thu Jan 18 10:58:45 CET 2007


CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_3_0
Changes by:	paul poulain <tipaul>	07/01/18 09:58:45

Modified files:
	updater        : updatedatabase 

Log message:
	defaulting NOT NULL fields (to '')

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

Patches:
Index: updatedatabase
===================================================================
RCS file: /sources/koha/koha/updater/updatedatabase,v
retrieving revision 1.157.2.50
retrieving revision 1.157.2.51
diff -u -b -r1.157.2.50 -r1.157.2.51
--- updatedatabase	18 Jan 2007 09:39:21 -0000	1.157.2.50
+++ updatedatabase	18 Jan 2007 09:58:45 -0000	1.157.2.51
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 
-# $Id: updatedatabase,v 1.157.2.50 2007/01/18 09:39:21 tipaul Exp $
+# $Id: updatedatabase,v 1.157.2.51 2007/01/18 09:58:45 tipaul Exp $
 
 # Database Updater
 # This script checks for required updates to the database.
@@ -672,12 +672,14 @@
             field => 'branchcode',
             type  => 'varchar(10)',
             null  => 'NOT NULL',
+            default    => '',
             extra => '',
         },
         {
             field => 'categorycode',
             type  => 'varchar(10)',
             null  => 'NOT NULL',
+            default    => '',
             extra => '',
         }
     ],
@@ -1678,8 +1680,8 @@
                 $sth =$dbh->prepare("alter table $table $action $field $type $null $key $extra default ? $after");
             }
 # ALTER TABLE `borrowers` CHANGE `branchcode` `branchcode` VARCHAR( 10 ) CHARACTER SET utf8 COLLATE utf8_general_ci NOT NULL 
-            $sth->execute($default);
             print "  alter or create $field in $table\n" unless $silent;
+            $sth->execute($default);
         }
     }
 }
@@ -2138,6 +2140,9 @@
 exit;
 
 # $Log: updatedatabase,v $
+# Revision 1.157.2.51  2007/01/18 09:58:45  tipaul
+# defaulting NOT NULL fields (to '')
+#
 # Revision 1.157.2.50  2007/01/18 09:39:21  tipaul
 # issuedate must be defaulted with ' '
 #





More information about the Koha-cvs mailing list