Call api when creating an issue with parent

emacs-pe · Apr 27, 2019 · aff4197 · aff4197
1 parent 3a6c9fd
commit aff4197
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/jiralib.el b/jiralib.el
@@ -351,8 +351,13 @@ request.el, so if at all possible, it should be avoided."
                         :data (json-encode (first params)))))
          (jiralib--rest-call-it (cdr (assoc 'self response)) :type "GET")
          ))
-      ('createIssueWithParent (jiralib--rest-call-it
-                               ))
+      ('createIssueWithParent
+       (let ((response (jiralib--rest-call-it
+                        "/rest/api/2/issue"
+                        :type "POST"
+                        :data (json-encode (first params)))))
+         (jiralib--rest-call-it (cdr (assoc 'self response)) :type "GET")
+         ))
       ('editComment (jiralib--rest-call-it
                      (format "/rest/api/2/issue/%s/comment/%s" (first params) (second params))
                      :data (json-encode `((body . ,(third params))))