diff --git a/src/pgsql/queries.lisp b/src/pgsql/queries.lisp index 1ab8228..7b416a3 100644 --- a/src/pgsql/queries.lisp +++ b/src/pgsql/queries.lisp @@ -76,10 +76,10 @@ (key-file (expand-user-homedir-pathname *pgsql-client-key*)) (pomo::*ssl-certificate-file* (when (and (ssl-enable-p pgconn) (probe-file crt-file)) - crt-file)) + (uiop:native-namestring crt-file))) (pomo::*ssl-key-file* (when (and (ssl-enable-p pgconn) (probe-file key-file)) - key-file))) + (uiop:native-namestring key-file)))) (flet ((connect (pgconn username) (handler-case (pomo:connect (db-name pgconn)