From: Eshel Yaron <me@eshelyaron.com>
Date: Mon, 29 Jul 2024 10:33:54 +0000 (+0200)
Subject: ; Fix 'kubed-kubectl-command' error when 'transient' is not loaded
X-Git-Tag: v0.2.0~36
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aee9cddd59ca99078033dcbb96661ed087678d40;p=kubed.git

; Fix 'kubed-kubectl-command' error when 'transient' is not loaded
---

diff --git a/kubed.el b/kubed.el
index 633df97..44319e7 100644
--- a/kubed.el
+++ b/kubed.el
@@ -1930,8 +1930,11 @@ Interactively, prompt for COMMAND with completion for `kubectl' arguments."
           "Command: "
           (concat
            kubed-kubectl-program " "
-           (let ((args (kubed-transient-args))
-                 (scope (and (fboundp 'transient-scope) (transient-scope))))
+           (let* ((args (kubed-transient-args))
+                  (prefix (and (fboundp 'transient-prefix-object)
+                               (transient-prefix-object)))
+                  (scope (and prefix (fboundp 'eieio-oref)
+                              (eieio-oref prefix 'scope))))
              (when (or args scope)
                (concat (string-join (append scope args) " ") " "))))
           'kubed-kubectl-command-history)))