Force libcrypto reload in src/hooks.lisp

cl+ssl::libcrypto is also read at startup. If not properly closed in the
hooks, together with libssl, libcrypto will be loaded at startup and if
the first cl+ssl file alternative fails, the debugger is invoked.

* Fixes #1370
This commit is contained in:
Athos Ribeiro 2022-04-12 14:57:58 -03:00 committed by Christoph Berg
parent a94a0a3327
commit 248c2f709a

View File

@ -24,6 +24,7 @@
"Close Foreign libs in use by pgloader at application save time."
(let (#+sbcl (sb-ext:*muffled-warnings* 'style-warning))
(mapc #'cffi:close-foreign-library '(cl+ssl::libssl
cl+ssl::libcrypto
mssql::sybdb))))
(defun open-foreign-libs ()