Hi,<div><br></div><div><div>Now Hunchentoot included the following code:</div><div><br></div><div><div>(when (find-package :swank)</div><div> (ignore-errors</div><div> (eval `(,(find-symbol (string '#:add-hook) :swank) </div>
<div> ,(find-symbol (string '#:*connection-closed-hook*) :swank)</div><div> 'after-close-swank-connection))))</div><div><br></div></div><div>This does not seem reliable, but is absolutely necessary for a more safe debugging remote servers. I propose a patch that will rewrite this code more natural way:</div>
<div><br></div><div>#+swank(swank:add-hook swank:*connection-closed-hook* 'after-close-swank-connection)</div><div><br></div><div>See attachment.</div><div><br></div><div><br></div><div>Moskvitin Andrey</div></div>