update SelfSubjectAccessReview default arg values

jinnovation · Apr 13, 2024 · ac7acc7 · ac7acc7
1 parent 22e19eb
commit ac7acc7
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/kele.el b/kele.el
@@ -1807,15 +1807,19 @@ Similar to `kele-dispatch'."
                                :selected (string-equal ctx ctx-current)))
                      (kele-context-names))))))
 
-(cl-defun kele--mk-self-subject-access-review (&key resource group (verb 'get) version)
+(cl-defun kele--mk-self-subject-access-review
+    (&key resource
+          (group "*")
+          (verb 'get)
+          (version "*"))
   "Stub out a SelfSubjectAccessReview for GROUP, RESOURCE, and VERB.
 
 Return the resulting SelfSubjectAccessReview in alist form."
   `((apiVersion . "authorization.k8s.io/v1")
     (kind . "SelfSubjectAccessReview")
     (spec . ((resourceAttributes . ((group . ,group)
                                     (resource . ,resource)
-                                    (version . ,(or version "*"))
+                                    (version . ,version)
                                     (verb . ,(symbol-name verb))))))))