Skip to content

Commit 3303c14

Browse files
committed
set namespace as buffer-local var in kele-list
1 parent 3d1db9a commit 3303c14

File tree

1 file changed

+14
-2
lines changed

1 file changed

+14
-2
lines changed

kele.el

Lines changed: 14 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1870,9 +1870,13 @@ support that verb will be offered as completion candidates."
18701870
(kele--gvk-create :group group :version version :kind kind)))
18711871

18721872

1873+
;; FIXME(@jinnovation): Could these be generalized to all kele buffers -- not just list ones?
18731874
(defvar kele--list-context nil
18741875
"The context corresponding to the current `kele-list-mode' buffer.")
18751876

1877+
(defvar kele--list-namespace nil
1878+
"The context corresponding to the current `kele-list-mode' buffer.")
1879+
18761880
(defvar kele--list-snapshot-time nil
18771881
"The last updated time for a `kele-list-mode' buffer.")
18781882

@@ -2143,8 +2147,12 @@ Resources listed are those defined in `kele-all-kinds'."
21432147
(or namespace "<all namespaces>")))))
21442148
(with-current-buffer buf
21452149
(setq-local kele--list-context context)
2146-
(setq-local kele--list-snapshot-time (current-time))
21472150
(put 'kele--list-context 'permanent-local t)
2151+
2152+
(setq-local kele--list-namespace namespace)
2153+
(put 'kele--list-namespace 'permanent-local t)
2154+
2155+
(setq-local kele--list-snapshot-time (current-time))
21482156
(put 'kele--list-snapshot-time 'permanent-local t)
21492157

21502158
(let ((inhibit-read-only t))
@@ -2204,8 +2212,12 @@ KIND is not namespaced, returns an error."
22042212
(or namespace "<all namespaces>")))))
22052213
(with-current-buffer buf
22062214
(setq-local kele--list-context context)
2207-
(setq-local kele--list-snapshot-time (current-time))
22082215
(put 'kele--list-context 'permanent-local t)
2216+
2217+
(setq-local kele--list-namespace namespace)
2218+
(put 'kele--list-namespace 'permanent-local t)
2219+
2220+
(setq-local kele--list-snapshot-time (current-time))
22092221
(put 'kele--list-snapshot-time 'permanent-local t)
22102222

22112223
(let ((inhibit-read-only t))

0 commit comments

Comments
 (0)