branch: elpa/pg
commit a817b23ae904c311b559f5966a0395efff15c3c3
Author: Eric Marsden <eric.mars...@risk-engineering.org>
Commit: Eric Marsden <eric.mars...@risk-engineering.org>

    Retain default gnutls-log-level in pg-connect/direct-tls
---
 pg.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/pg.el b/pg.el
index 652d5070ebd..903bd5bd1b3 100644
--- a/pg.el
+++ b/pg.el
@@ -925,9 +925,7 @@ are passed to GnuTLS."
                        ;; see 
https://www.iana.org/assignments/tls-extensiontype-values/tls-extensiontype-values.xhtml#alpn-protocol-ids
                        (list :alpn-protocols (list "postgresql"))
                        (when cert (list :keylist cert))
-                       (when (listp tls-options) tls-options)))
-         (gnutls-log-level 3)
-         (gnutls-verify-error nil))
+                       (when (listp tls-options) tls-options))))
     (with-current-buffer buf
       (set-process-coding-system process 'binary 'binary)
       (set-buffer-multibyte nil)
@@ -2270,7 +2268,8 @@ PostgreSQL and Emacs. CON should no longer be used."
     (kill-buffer (pgcon-query-log con)))
   (clrhash (pgcon-parser-by-oid con))
   (clrhash (pgcon-typname-by-oid con))
-  (clrhash (pgcon-oid-by-typname con)))
+  (clrhash (pgcon-oid-by-typname con))
+  nil)
 
 
 

Reply via email to