diff --git a/src/parsers/command-db-uri.lisp b/src/parsers/command-db-uri.lisp index ae280ff..edb8190 100644 --- a/src/parsers/command-db-uri.lisp +++ b/src/parsers/command-db-uri.lisp @@ -124,6 +124,7 @@ (defrule dsn-dbname (and "/" (? (or single-quoted-string (* (or (alpha-char-p character) (digit-char-p character) + #\. punct))))) (:lambda (dbn) (list :dbname (text (second dbn)))))