From 54997be2dd628af8dbf004ec0eb42f933446d68e Mon Sep 17 00:00:00 2001 From: Victor Kryukov Date: Tue, 24 Feb 2015 16:55:04 -0800 Subject: [PATCH] Fix 182: properly quote tables with . in their names --- src/pgsql/schema.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/pgsql/schema.lisp b/src/pgsql/schema.lisp index 2d5c368..25a5bdc 100644 --- a/src/pgsql/schema.lisp +++ b/src/pgsql/schema.lisp @@ -26,7 +26,7 @@ (cond ((quoted-p identifier) :none) - ((cl-ppcre:scan "^[^A-Za-z_]" identifier) + ((cl-ppcre:scan "[^A-Za-z_]" identifier) :quote) ((member lowercase-identifier *pgsql-reserved-keywords*