diff --git a/el/sclang-interp.el b/el/sclang-interp.el index 6ca8b46..f9c7e4f 100644 --- a/el/sclang-interp.el +++ b/el/sclang-interp.el @@ -231,7 +231,9 @@ If EOB-P is non-nil, positions cursor at end of buffer." (defun sclang-on-library-shutdown () (run-hooks 'sclang-library-shutdown-hook) - (setq sclang-library-initialized-p nil)) + (setq sclang-library-initialized-p nil) + (sclang-message "Shutting down library...") + ) ;; ===================================================================== ;; process hooks @@ -346,6 +348,7 @@ If EOB-P is non-nil, positions cursor at end of buffer." "Recompile class library." (interactive) (when (sclang-get-process) + (sclang-on-library-shutdown) (process-send-string sclang-process "\x18") ))