Function: magit-delete-remote-branch-sentinel

magit-delete-remote-branch-sentinel is a byte-compiled function defined in magit-branch.el.

Signature

(magit-delete-remote-branch-sentinel REMOTE REFS PROCESS EVENT)

Source Code

;; Defined in ~/.emacs.d/elpa/magit-20260411.1452/magit-branch.el
(defun magit-delete-remote-branch-sentinel (remote refs process event)
  (cond-let*
    ((not (memq (process-status process) '(exit signal))))
    ([_(= (process-exit-status process) 1)]
     [on-remote (mapcar (##concat "refs/remotes/" remote "/" %)
                        (magit-remote-list-branches remote))]
     [rest (seq-filter (##and (not (member % on-remote))
                              (magit-ref-exists-p %))
                       refs)]
     (process-put process 'inhibit-refresh t)
     (magit-process-sentinel process event)
     (setq magit-this-error nil)
     (message "Some remote branches no longer exist.  %s"
              "Deleting just the local tracking refs instead...")
     (dolist (ref rest)
       (magit-call-git "update-ref" "-d" ref))
     (magit-refresh)
     (message "Deleting local remote-tracking refs...done"))
    ((magit-process-sentinel process event))))