update find-links function

rapyuta-robotics · Sep 4, 2024 · aa69cd3 · aa69cd3
1 parent 016f8b1
commit aa69cd3
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/src/wrike_ist/core.cljs b/src/wrike_ist/core.cljs
@@ -13,9 +13,13 @@
         azure-pattern #"https://dev\.azure\.com/[^/]+/[^/]+/_workitems/edit/\d+"
         combined-pattern (re-pattern (str wrike-pattern "|" azure-pattern))]
     (let [matches (re-seq combined-pattern text)]
-      (if (seq matches)
-        (distinct matches)
-        (js/console.log "No matching links found")))))
+      (do
+        (js/console.log "Combined Pattern:" combined-pattern)
+        (js/console.log "Text to Search:" text)
+        (js/console.log "Matches Found:" matches)
+        (if (seq matches)
+          (distinct matches)
+          (js/console.log "No matching links found"))))))
 
 (defn extract-details
   [pr-obj]