mirror of
https://github.com/status-im/open-bounty.git
synced 2025-02-11 00:46:36 +00:00
d806e38433
If "Fixes: #NN" is removed from PR title/description, no longer consider it a claim for any issue.
25 lines
716 B
Clojure
25 lines
716 B
Clojure
(ns commiteth.db.pull-requests
|
|
(:require [commiteth.db.core :refer [*db*] :as db]
|
|
[clojure.java.jdbc :as jdbc]
|
|
[clojure.tools.logging :as log]))
|
|
|
|
|
|
(defn save
|
|
"Creates or updates a pull-request"
|
|
[pull-request]
|
|
(let [state (case (:state pull-request)
|
|
:opened 0
|
|
:merged 1
|
|
:closed 2)]
|
|
|
|
(log/debug "save pr" (assoc pull-request :state state))
|
|
(jdbc/with-db-connection [con-db *db*]
|
|
(db/save-pull-request! con-db
|
|
(assoc pull-request :state state)))))
|
|
|
|
(defn remove
|
|
[pr-id]
|
|
(jdbc/with-db-connection [con-db *db*]
|
|
(db/remove-pull-request! con-db
|
|
{:pr_id pr-id})))
|