apply the title in pull-request title when there is just one migration (

#25)
nubank · Oct 1, 2024 · 9180026 · 9180026
1 parent 0d1b52b
commit 9180026
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/src/ordnungsamt/render.clj b/src/ordnungsamt/render.clj
@@ -1,11 +1,13 @@
 (ns ordnungsamt.render
   (:require [clojure.string]
             [ordnungsamt.utils :as utils]
-            [selmer.parser :as selmer]
+            [selmer.parser]
             [selmer.util :refer [without-escaping]]))
 
 (defn render-title [context]
-  (selmer.parser/render "[Auto] Refactors - {{date}}" context))
+  (if (-> context :migrations count (= 1))
+    (selmer.parser/render "[Auto] {{title}}" (-> context :migrations first))
+    (selmer.parser/render "[Auto] Refactors - {{date}}" context)))
 
 (def migration-template
   "## {{title}} [{{created-at}}]

diff --git a/test/integration/integration/apply_migrations_test.clj b/test/integration/integration/apply_migrations_test.clj
@@ -35,7 +35,7 @@
     (and (= (:path request)
             (str "/repos/" org "/" repository "/pulls"))
          (standalone/match?
-           {:title #(clojure.string/starts-with? % title-prefix)
+           {:title #(or (clojure.string/starts-with? % title-prefix) (clojure.string/includes? % (-> migrations first :title)))
             :body  (fn [txt] (every? (partial includes-migration-info? txt)
                                      migrations))}
            (json/parse-string (:body request) keyword)))))