Only free SSL context when not in background

2020-06-13 15:41:57 -04:00 · 2020-06-13 17:30:13 +02:00 · 2020-06-13 17:30:13 +02:00
commit d3ed5a92d5
1 changed files with 1 additions and 1 deletions
--- a/server.lisp
+++ b/server.lisp
@ -76,7 +76,7 @@
  (with-global-context ((make-context :disabled-protocols (list +ssl-op-no-sslv2+ +ssl-op-no-sslv3+
                                                                +ssl-op-no-tlsv1+ +ssl-op-no-tlsv1-1+
                                                                +ssl-op-no-tlsv1-2+))
-                        :auto-free-p t)
+                        :auto-free-p (not background))
     (usocket:socket-server host port #'gemini-handler ()
                           :multi-threading t
                           :element-type '(unsigned-byte 8)