From dcec7bb2020acef92b68691cf968a2379f560f8c Mon Sep 17 00:00:00 2001
From: Matthew Carter <m@ahungry.com>
Date: Thu, 13 Apr 2023 00:38:53 -0400
Subject: [PATCH] Fix for initial-input in #'org-jira-read-issue-type

---
 org-jira.el | 18 +++++++++++-------
 1 file changed, 11 insertions(+), 7 deletions(-)

diff --git a/org-jira.el b/org-jira.el
index 03dc638..7acd9f5 100644
--- a/org-jira.el
+++ b/org-jira.el
@@ -1764,14 +1764,18 @@ that should be bound to an issue."
                          (jiralib-get-issue-types))))
          (initial-input (when (member (car org-jira-type-read-history) issue-types)
                           org-jira-type-read-history)))
+
+    ;; TODO: The completing-read cards as such are all over the place, and always tend
+    ;; to follow this exact same call structure - we should abstract to a single fn
+    ;; that will allow calling with fewer or keyword args
     (completing-read
-     "Type: "
-     issue-types
-     nil
-     t
-     nil
-     initial-input
-     (car initial-input))))
+     "Type: "                           ; PROMPT
+     issue-types                        ; COLLECTION
+     nil                                ; PREDICATE
+     t                                  ; REQUIRE-MATCH
+     nil                                ; INITIAL-INPUT
+     'initial-input                     ; HIST
+     (car initial-input))))             ; DEF
 
 (defun org-jira-read-subtask-type ()
   "Read issue type name."