From 7472c8a8664db77a8fdd9db5326f87fc4bb29f5c Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Mon, 7 Jul 2003 15:37:20 +0000
Subject: [PATCH] *** empty log message ***

---
 updater/updatedatabase | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/updater/updatedatabase b/updater/updatedatabase
index 00469c7938..63899d9e95 100755
--- a/updater/updatedatabase
+++ b/updater/updatedatabase
@@ -716,10 +716,11 @@ foreach $table ( keys %fielddefinitions ) {
 				$extra = '';
 			}
 # if it's a primary key, drop the previous pk, before altering the table
+			my $sth;
 			if ($key eq 'PRI') {
-				my $sth =$dbh->prepare("alter table $table change $field $field $type $null $key $extra default ?");
+				$sth =$dbh->prepare("alter table $table change $field $field $type $null $key $extra default ?");
 			} else {
-				my $sth =$dbh->prepare("alter table $table drop primary key, change $field $field $type $null $key $extra default ?");
+				$sth =$dbh->prepare("alter table $table drop primary key, change $field $field $type $null $key $extra default ?");
 			}
 			$sth->execute($default);
 			print "  Alter $field in $table\n";
@@ -868,8 +869,8 @@ $sth->finish;
 exit;
 
 # $Log$
-# Revision 1.55  2003/07/07 15:36:13  tipaul
-# (again) fix to avoid errors when creating fields that are primary keys and a previous primary key exist.
+# Revision 1.56  2003/07/07 15:37:20  tipaul
+# *** empty log message ***
 #
 # Revision 1.53  2003/07/07 14:11:16  tipaul
 # fixing bug #526 : gst rate is now calculated through systempref gist entry.
-- 
2.39.2