allow db names with dot (dimitri#1059)

darioleanbit · Nov 3, 2022 · 999791d · 999791d
1 parent b0f0f83
commit 999791d
Showing 1 changed file with 1 addition and 0 deletions.
diff --git 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)))))