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.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'Bugzilla/DB.pm')

diff --git a/Bugzilla/DB.pm b/Bugzilla/DB.pm
index c87ecbdf5..b42672398 100644
--- a/Bugzilla/DB.pm
+++ b/Bugzilla/DB.pm
@@ -841,6 +841,17 @@ sub bz_table_columns {
     return $self->_bz_real_schema->get_table_columns($table);
 }
 
+sub bz_table_indexes {
+    my ($self, $table) = @_;
+    my $indexes = $self->_bz_real_schema->get_table_indexes_abstract($table);
+    my %return_indexes;
+    # We do this so that they're always hashes.
+    foreach my $name (keys %$indexes) {
+        $return_indexes{$name} = $self->bz_index_info($table, $name);
+    }
+    return \%return_indexes;
+}
+
 #####################################################################
 # Protected "Real Database" Schema Information Methods
 #####################################################################
-- 
cgit v1.2.3-24-g4f1b