Tweak pods detail

kubernetes-el · Apr 16, 2017 · a75ba09 · a75ba09
1 parent 4666450
commit a75ba09
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 10 deletions.
diff --git a/kubernetes-pods.el b/kubernetes-pods.el
@@ -24,13 +24,13 @@
                                   'podIP pod-ip
                                   'startTime start-time))
           pod))
-    (-non-nil (list (funcall detail "Name" name)
-                    (funcall detail "Labels" label-name)
-                    (funcall detail "Namespace" ns)
-                    (funcall detail "Image" image)
-                    (funcall detail "Host IP" host-ip)
-                    (funcall detail "Pod IP" pod-ip)
-                    (funcall detail "Started" start-time)))))
+    (list (funcall detail "Name" name)
+          (funcall detail "Label" label-name)
+          (funcall detail "Namespace" ns)
+          (funcall detail "Image" image)
+          (funcall detail "Host IP" host-ip)
+          (funcall detail "Pod IP" pod-ip)
+          (funcall detail "Started" start-time))))
 
 (defun kubernetes-pods--format-line (state pod)
   (-let* ((current-time (kubernetes-state-current-time state))

diff --git a/test/kubernetes-pods-test.el b/test/kubernetes-pods-test.el
@@ -65,7 +65,7 @@ Pods (2)
   Name                                          Status     Ready   Restarts    Age
   example-svc-v3-1603416598-2f9lb               Running      1/1        0      36d
     Name:       example-service
-    Labels:     example-pod-v3
+    Label:      example-pod-v3
     Namespace:  ns.example
     Image:      example.com/example-service:3.0.0
     Host IP:    10.0.0.0
@@ -74,7 +74,7 @@ Pods (2)
 
   example-svc-v4-1603416598-2f9lb               Running      1/1        0      36d
     Name:       example-service
-    Labels:     example-pod-v4
+    Label:      example-pod-v4
     Namespace:  ns.example
     Image:      example.com/example-service:4.8.0
     Host IP:    10.0.0.0
@@ -103,7 +103,7 @@ Pods (2)
       (forward-line 2)
 
       (dolist (key '("Name"
-                     "Labels"
+                     "Label"
                      "Namespace"
                      "Image"
                      "Host IP"