scel: shutdown library before class library recompilation

Signed-off-by: Tim Blechmann <tim@klingt.org>
This commit is contained in:
Tim Blechmann 2011-09-20 14:19:45 +02:00
parent b64f936a3e
commit d91e92f53f

View file

@ -231,7 +231,9 @@ If EOB-P is non-nil, positions cursor at end of buffer."
(defun sclang-on-library-shutdown () (defun sclang-on-library-shutdown ()
(run-hooks 'sclang-library-shutdown-hook) (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 ;; process hooks
@ -346,6 +348,7 @@ If EOB-P is non-nil, positions cursor at end of buffer."
"Recompile class library." "Recompile class library."
(interactive) (interactive)
(when (sclang-get-process) (when (sclang-get-process)
(sclang-on-library-shutdown)
(process-send-string sclang-process "\x18") (process-send-string sclang-process "\x18")
)) ))