From b239e6b556bc2e29feece493e20681ab5fbecc82 Mon Sep 17 00:00:00 2001 From: Dimitri Fontaine Date: Tue, 3 Jan 2017 22:28:58 +0100 Subject: [PATCH] Fix #498. --- src/parsers/command-alter-table.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/parsers/command-alter-table.lisp b/src/parsers/command-alter-table.lisp index 7a5489d..6493602 100644 --- a/src/parsers/command-alter-table.lisp +++ b/src/parsers/command-alter-table.lisp @@ -6,7 +6,7 @@ (in-package #:pgloader.parser) (defrule match-rule-target-regex quoted-regex - (:lambda (re) (make-regex-match-rule :target re))) + (:lambda (re) (make-regex-match-rule :target (second re)))) (defrule match-rule-target-string quoted-namestring (:lambda (s) (make-string-match-rule :target s)))