Skip to content

Commit

Permalink
Update core.cljc
Browse files Browse the repository at this point in the history
  • Loading branch information
verberktstan authored Apr 15, 2024
1 parent 23f7e20 commit 402bca9
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/swark/core.cljc
Original file line number Diff line number Diff line change
Expand Up @@ -88,7 +88,7 @@
;; TODO: Add tests & fn metadata
(defn with-retries
[n f & args]
(letfn [(meta-n [x n] (jab vary-meta result #(assoc % ::n (inc n))))]
(letfn [(meta-n [x n] (jab vary-meta x #(assoc % ::n (inc n))))]
(reduce
(fn retry [_ n]
(when-let [result (apply jab f args)]
Expand Down

0 comments on commit 402bca9

Please sign in to comment.