-(defun notmuch-start-notmuch-error-sentinel (proc event)
- (let ((buffer (process-buffer proc)))
- (when (buffer-live-p buffer)
- (kill-buffer buffer))))
+(defun notmuch-start-notmuch-error-sentinel (proc _event)
+ (unless (process-live-p proc)
+ (let ((buffer (process-buffer proc)))
+ (when (buffer-live-p buffer)
+ (kill-buffer buffer)))))