From 3e5115c493ceb67d1cb9586e04da875ab6e887f9 Mon Sep 17 00:00:00 2001
From: Dimitri Fontaine <dim@tapoueh.org>
Date: Mon, 26 Jan 2015 16:56:39 +0100
Subject: [PATCH] Fix MS SQL index names.

As MS SQL index names may contain dots, replace dots with underscores.
That should fix #158 once again.
---
 src/sources/mssql/mssql-schema.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/sources/mssql/mssql-schema.lisp b/src/sources/mssql/mssql-schema.lisp
index 542754f..07de034 100644
--- a/src/sources/mssql/mssql-schema.lisp
+++ b/src/sources/mssql/mssql-schema.lisp
@@ -168,7 +168,7 @@ order by table_schema, table_name, ordinal_position"
      :in  (mssql-query (format nil "
     select schema_name(schema_id) as SchemaName,
            o.name as TableName,
-           i.name as IndexName,
+           REPLACE(i.name, '.', '_') as IndexName,
            co.[name] as ColumnName,
            i.is_unique,
            i.is_primary_key