From d4e9172ad5f59d882ff372aff2cadd2c8c7f1ed3 Mon Sep 17 00:00:00 2001
From: "mkanat%bugzilla.org" <>
Date: Thu, 19 Apr 2007 17:59:37 +0000
Subject: Bug 377564: Indexes are not renamed when renaming tables Patch By Max
 Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=mkanat

---
 Bugzilla/DB/Schema.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'Bugzilla/DB')

diff --git a/Bugzilla/DB/Schema.pm b/Bugzilla/DB/Schema.pm
index 44bda1acb..844f0b0e8 100644
--- a/Bugzilla/DB/Schema.pm
+++ b/Bugzilla/DB/Schema.pm
@@ -1588,6 +1588,13 @@ sub get_table_columns {
 
 } #eosub--get_table_columns
 
+sub get_table_indexes_abstract {
+    my ($self, $table) = @_;
+    my $table_def = $self->get_table_abstract($table);
+    my %indexes = @{$table_def->{INDEXES} || []};
+    return \%indexes;
+}
+
 sub get_create_database_sql {
     my ($self, $name) = @_;
     return ("CREATE DATABASE $name");
-- 
cgit v1.2.3-24-g4f1b