From: Eshel Yaron <me@eshelyaron.com>
Date: Wed, 14 Aug 2024 16:15:52 +0000 (+0200)
Subject: ; (kubed-list-delete-marked): Update original buffer.
X-Git-Tag: v0.3.2~12
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cca5f428919b4c102782d8130a4f3514e7f9b282;p=kubed.git

; (kubed-list-delete-marked): Update original buffer.
---

diff --git a/kubed.el b/kubed.el
index d8511e7..9982f93 100644
--- a/kubed.el
+++ b/kubed.el
@@ -741,7 +741,8 @@ regardless of QUIET."
                 (tabulated-list-put-tag
                  (propertize "K" 'help-echo "Deletion in progress")))
               (forward-line)))
-          (let ((errb (generate-new-buffer " *kubed-list-delete-marked-stderr*")))
+          (let ((errb (generate-new-buffer " *kubed-list-delete-marked-stderr*"))
+                (buf (current-buffer)))
             (make-process
              :name "*kubed-list-delete-marked*"
              :stderr errb
@@ -753,7 +754,9 @@ regardless of QUIET."
                           ((string= status "finished\n")
                            (message (format "Deleted %d marked Kubernetes resources."
                                             (length delete-list)))
-                           (kubed-list-update t))
+                           (when (buffer-live-p buf)
+                             (with-current-buffer buf
+                               (kubed-list-update t))))
                           ((string= status "exited abnormally with code 1\n")
                            (with-current-buffer errb
                              (goto-char (point-max))