(tabulated-list-print t)
(tabulated-list-init-header))
-(declare-function kubed-list-transient "kubed-transient" ())
+(declare-function kubed-list-transient "kubed-transient" ())
+(declare-function kubed-transient-logs-for-pod "kubed-transient" (val))
+(declare-function kubed-transient-logs-for-deployment "kubed-transient" (val))
+(declare-function kubed-transient-logs-for-statefulset "kubed-transient" (val))
+(declare-function kubed-transient-logs-for-replicaset "kubed-transient" (val))
+(declare-function kubed-transient-logs-for-job "kubed-transient" (val))
+(declare-function kubed-transient-logs-for-service "kubed-transient" (val))
(defvar-keymap kubed-list-mode-map
:doc "Common keymap for Kubernetes resource list buffers."
(map-name (intern (format "kubed-%S-prefix-map" resource)))
(menu-map (intern (format "kubed-%S-menu-map" resource)))
(logs-cmd (intern (format "kubed-logs-for-%S" resource)))
+ (logs-trs (intern (format "kubed-transient-logs-for-%S" resource)))
(namespaced t) (logs nil)
(keyword nil)
frmt-var buff-fun list-cmd expl-cmd dlt-name mod-name
(let ( ,resource context namespace
container follow limit prefix since tail timestamps)
(dolist (arg (kubed-transient-args
- ',(intern (format "kubed-transient-logs-for-%S" resource))))
+ ',logs-trs))
(cond
((string-match "--namespace=\\(.+\\)" arg)
(setq namespace (match-string 1 arg)))
(defvar-keymap ,(intern (format "kubed-%S-mode-map" plrl-var))
:doc ,(format "Keymap for `%S" mod-name)
"+" #',crt-name
- ,@(when logs `("l" #'kubed-list-logs
- "L" #',(intern (format "kubed-transient-logs-for-%S" resource))))
+ ,@(when logs
+ `("l" #'kubed-list-logs
+ "L" #',logs-trs))
,@(mapcan
(pcase-lambda (`(,suffix ,key ,_desc . ,_body))
(when key
;;;###autoload (autoload 'kubed-delete-pods "kubed" nil t)
;;;###autoload (autoload 'kubed-list-pods "kubed" nil t)
;;;###autoload (autoload 'kubed-create-pod "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-pod "kubed" nil t)
;;;###autoload (autoload 'kubed-pod-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource pod
((phase ".status.phase" 10
;;;###autoload (autoload 'kubed-delete-services "kubed" nil t)
;;;###autoload (autoload 'kubed-list-services "kubed" nil t)
;;;###autoload (autoload 'kubed-create-service "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-service "kubed" nil t)
;;;###autoload (autoload 'kubed-service-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource service
((type ".spec.type" 12)
;;;###autoload (autoload 'kubed-delete-jobs "kubed" nil t)
;;;###autoload (autoload 'kubed-list-jobs "kubed" nil t)
;;;###autoload (autoload 'kubed-create-job "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-job "kubed" nil t)
;;;###autoload (autoload 'kubed-job-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource job
((status ".status.conditions[0].type" 10) (starttime ".status.startTime" 20))
;;;###autoload (autoload 'kubed-delete-deployments "kubed" nil t)
;;;###autoload (autoload 'kubed-list-deployments "kubed" nil t)
;;;###autoload (autoload 'kubed-create-deployment "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-deployment "kubed" nil t)
;;;###autoload (autoload 'kubed-deployment-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource deployment
(( ready ".status.readyReplicas" 6
;;;###autoload (autoload 'kubed-delete-replicasets "kubed" nil t)
;;;###autoload (autoload 'kubed-list-replicasets "kubed" nil t)
;;;###autoload (autoload 'kubed-create-replicaset "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-replicaset "kubed" nil t)
;;;###autoload (autoload 'kubed-replicaset-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource replicaset
((reps ".status.replicas" 4
;;;###autoload (autoload 'kubed-delete-statefulsets "kubed" nil t)
;;;###autoload (autoload 'kubed-list-statefulsets "kubed" nil t)
;;;###autoload (autoload 'kubed-create-statefulset "kubed" nil t)
+;;;###autoload (autoload 'kubed-logs-for-statefulset "kubed" nil t)
;;;###autoload (autoload 'kubed-statefulset-prefix-map "kubed" nil t 'keymap)
(kubed-define-resource statefulset
((reps ".status.replicas" 4