From 3582efac20dbd54a32f3fe3a42ca9734240aa398 Mon Sep 17 00:00:00 2001 From: Jonathan Jin Date: Mon, 3 Jun 2024 19:57:10 +0200 Subject: [PATCH] fix: actually bind kele-get-mode keybindings (#203) --- docs/references/changelog.md | 1 + kele.el | 8 +++++--- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/docs/references/changelog.md b/docs/references/changelog.md index 8bb2451a..f972263d 100644 --- a/docs/references/changelog.md +++ b/docs/references/changelog.md @@ -30,6 +30,7 @@ versioning][semver]. resource name is used, e.g. "Get a single pods" instead of "Get a single pod" - Fixed a bug where keybinding explanation "blurbs" in `kele-get` buffers don't properly show the keybinding in clickable form +- Fixed a bug where keybindings in `kele-get-mode` are not actually bound ### Changed diff --git a/kele.el b/kele.el index 19e7ba40..723747d5 100644 --- a/kele.el +++ b/kele.el @@ -1040,7 +1040,8 @@ show the requested Kubernetes object manifest. :keymap `((,(kbd "q") . quit-window) (,(kbd "Q") . kele--quit-and-kill) (,(kbd "g") . kele-refetch)) - (read-only-mode 1)) + (when kele-get-mode + (read-only-mode 1))) (cl-defstruct (kele--list-entry-id (:constructor kele--list-entry-id-create) @@ -1245,9 +1246,10 @@ context and namespace in its name." :namespace (kele--resource-container-namespace object))) (put 'kele--current-resource-buffer-context 'permanent-local t)) - (kele-get-mode 1) (when kele-yaml-highlighting-mode - (funcall kele-yaml-highlighting-mode))) + (funcall kele-yaml-highlighting-mode)) + + (kele-get-mode 1)) (select-window (display-buffer buf)))) (defun kele--prune (alist &rest keys)