fetch depth 0

Author: borkdude

.github/workflows/ci.yml

@@ -41,6 +41,8 @@ jobs:
       - bb-test
     steps:
       - name: Checkout
+        with:
+          fetch-depth: 0
         uses: actions/checkout@v2-beta
       - name: Install clojure tools
         uses: DeLaGuardo/setup-clojure@3.5

bb.edn

@@ -6,5 +6,5 @@
             :task (clojure "-M:test")}
   test:bb {:doc "Run babashka tests"
            :task clj-http.lite.test-runner/-main}
-  deploy
-  {:task (t/deploy)}}}
+  publish
+  {:task (t/publish)}}}

bb/tasks.clj

@@ -4,16 +4,15 @@
             [clojure.string :as str]))
 
 (defn replace-version [file version cc]
-  (prn version cc)
   (spit file
         (str/replace (slurp file)
                      (re-pattern (format "(%s)\\.(\\d+)" version))
                      (fn [[_ version _]]
                        (str version "." cc)))))
 
-(defn deploy []
+(defn publish []
   (let [;; commit count + 1 for README update
-        cc (inc (Integer/parseInt (shared/git-count-revs)))
+        cc (inc (shared/git-count-revs))
         tag (str "Release-" shared/version)]
     (replace-version "README.md" shared/base-version cc)
     (replace-version "project.clj" shared/base-version cc)

build_shared.clj

@@ -6,7 +6,8 @@
 (defn git-count-revs []
   (-> (apply sh (str/split "git rev-list HEAD --count" #" "))
       :out
-      str/trim))
+      str/trim
+      Integer/parseInt))
 
 (def base-version (edn/read-string (slurp "version.edn")))
 (def version (str base-version "." (git-count-revs)))