Function: shell-command-sentinel

shell-command-sentinel is a byte-compiled function defined in simple.el.gz.

Signature

(shell-command-sentinel PROCESS SIGNAL)

Source Code

;; Defined in /usr/src/emacs/lisp/simple.el.gz
;; We have a sentinel to prevent insertion of a termination message
;; in the buffer itself, and to set the point in the buffer when
;; `shell-command-dont-erase-buffer' is non-nil.
(defun shell-command-sentinel (process signal)
  (when (memq (process-status process) '(exit signal))
    (shell-command-set-point-after-cmd (process-buffer process))
    (message "%s: %s."
             (car (cdr (cdr (process-command process))))
             (substring signal 0 -1))))