projects
/
dbsrgits/SQL-Translator.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Escape quotes in string values in producers
[dbsrgits/SQL-Translator.git]
/
lib
/
SQL
/
Translator
/
Generator
/
DDL
/
SQLServer.pm
diff --git
a/lib/SQL/Translator/Generator/DDL/SQLServer.pm
b/lib/SQL/Translator/Generator/DDL/SQLServer.pm
index
9e35d89
..
7221229
100644
(file)
--- a/
lib/SQL/Translator/Generator/DDL/SQLServer.pm
+++ b/
lib/SQL/Translator/Generator/DDL/SQLServer.pm
@@
-136,7
+136,7
@@
sub enum_constraint {
return (
'CONSTRAINT ' . $self->enum_constraint_name($field_name) .
' CHECK (' . $self->quote($field_name) .
- ' IN (' . join( ',', map qq('$_'), @$vals ) . '))'
+ ' IN (' . join( ',', map $self->quote_string($_), @$vals ) . '))'
)
}