pass correct link to link type function

rapyuta-robotics · Sep 4, 2024 · 6046085 · 6046085
1 parent 6ce6f99
commit 6046085
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/wrike_ist/core.cljs b/src/wrike_ist/core.cljs
@@ -63,20 +63,20 @@
     (if-let [pr (.-pull_request payload)]
       (loop [links (extract-details pr)]
         (when-let [{:keys [state pr-url] :as details} (first links)]
-          (let [link-type (find-link-type pr-url)]
+          (let [link-type (find-link-type (first links))]
             (-> (case state
                   :draft
                   (case link-type
                     :wrike (wrike/link-pr details)
                     :azure (azure/link-pr details)
-                    :unknown (js/console.log (str "Unknown link type: " pr-url))
+                    :unknown (js/console.log (str "Unknown link type: " (first links)))
                     (js/Promise.resolve))
 
                   :open
                   (case link-type
                     :wrike (wrike/link-pr details)
                     :azure (azure/link-pr details)
-                    :unknown (js/console.log (str "Unknown link type: " pr-url))
+                    :unknown (js/console.log (str "Unknown link type: " (first links)))
                     (js/Promise.resolve))
 
                   ;; else ignore