Function: majutsu-interactive--temp-dir-process-sentinel

majutsu-interactive--temp-dir-process-sentinel is a natively compiled function defined in majutsu-interactive.el.

Signature

(majutsu-interactive--temp-dir-process-sentinel PROCESS EVENT)

Documentation

Run PROCESS's original sentinel for EVENT.

Remove its temporary directory when PROCESS exits or is signaled.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-interactive.el
(defun majutsu-interactive--temp-dir-process-sentinel (process event)
  "Run PROCESS's original sentinel for EVENT.
Remove its temporary directory when PROCESS exits or is signaled."
  (let ((original (process-get process 'majutsu-interactive-original-sentinel)))
    (unwind-protect
        (when original
          (funcall original process event))
      (when (memq (process-status process) '(exit signal))
        (majutsu-interactive--delete-operation-temp-dir
         (process-get process 'majutsu-interactive-temp-dir))))))