Bug 278148: checksetup.pl *still* errors when trying to drop index on milestones table

Patch by Max K-A <mkanat@kerio.com> r=travis a=justdave

Bug 278148: checksetup.pl still errors when trying to drop index on milestones table
427d238b · travis%sedsystems.ca · 889d3425 · 427d238b
Commit 427d238b authored Jan 14, 2005 by travis%sedsystems.ca
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 3 deletions

checksetup.pl checksetup.pl +8 -3

No files found.
--- a/checksetup.pl
+++ b/checksetup.pl
@@ -2365,9 +2365,14 @@ sub DropIndexes ($)
      # 
      next if exists $SEEN{$$ref[2]};

-      my $dropSth = $dbh->prepare("ALTER TABLE $table DROP INDEX $$ref[2]");
-      $dropSth->execute;
-      $dropSth->finish;
+      if ($$ref[2] eq 'PRIMARY') {
+          # The syntax for dropping a PRIMARY KEY is different
+          # from the normal DROP INDEX syntax.
+          $dbh->do("ALTER TABLE $table DROP PRIMARY KEY"); 
+      }
+      else {
+          $dbh->do("ALTER TABLE $table DROP INDEX $$ref[2]");
+      }
      $SEEN{$$ref[2]} = 1;

    }