Leave ssl lib alone in src/hooks.lisp.

That means we no longer eagerly load it when we think we will need it,
and also refrain from unloading it from the binary at image saving time.

In my local tests, doing so fix #330 by avoiding the error entirely in
the docker image, where obviously the libs found at build-time are found
again at the same place at run time.
This commit is contained in:
Dimitri Fontaine 2016-03-05 22:45:59 +01:00
parent 68aa205db5
commit d4737a39ca

View File

@ -17,7 +17,7 @@
(defun close-foreign-libs ()
"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
(mapc #'cffi:close-foreign-library '(;; cl+ssl::libssl
mssql::sybdb))))
(defun open-foreign-libs ()
@ -27,8 +27,10 @@
;; in only when the data source is a MS SQL database.
(cffi:load-foreign-library 'cl+ssl::libssl)))
#|
#+ccl (push #'open-foreign-libs *lisp-startup-functions*)
#+sbcl (push #'open-foreign-libs sb-ext:*init-hooks*)
|#
#+ccl (push #'close-foreign-libs *save-exit-functions*)
#+sbcl (push #'close-foreign-libs sb-ext:*save-hooks*)