Keep name casing for foreign keys on mssql (#1145)

This commit is contained in:
Semen Miroshnichenko 2020-05-09 17:49:04 +02:00 committed by GitHub
parent 38a62a7143
commit 11d926126e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -146,7 +146,7 @@
(col-name (apply-identifier-case col))
(fcol-name (apply-identifier-case fcol))
(pg-fkey
(make-fkey :name fkey-name
(make-fkey :name (apply-identifier-case fkey-name)
:table table
:columns nil
:foreign-table ftable