diff --git a/src/parsers/command-mssql.lisp b/src/parsers/command-mssql.lisp
index 9b29732..74bc696 100644
--- a/src/parsers/command-mssql.lisp
+++ b/src/parsers/command-mssql.lisp
@@ -26,7 +26,8 @@
                           option-create-schemas
                           option-create-indexes
                           option-reset-sequences
-                          option-encoding))
+                          option-encoding
+                          option-identifiers-case))
 
 (defrule another-mssql-option (and comma mssql-option)
   (:lambda (source)
diff --git a/src/sources/mssql/mssql.lisp b/src/sources/mssql/mssql.lisp
index 6cc1ade..9daee61 100644
--- a/src/sources/mssql/mssql.lisp
+++ b/src/sources/mssql/mssql.lisp
@@ -296,8 +296,7 @@
                   ;; index build might get unsync: indexes for different tables
                   ;; will get built in parallel --- not a big problem.
                   (when (and create-indexes (not data-only))
-                    (let* ((*identifier-case* :none)
-                           (s-entry  (assoc schema all-indexes :test 'equal))
+                    (let* ((s-entry  (assoc schema all-indexes :test 'equal))
                            (indexes-with-names
                             (cdr (assoc table-name (cdr s-entry) :test 'equal))))