From 3fac61b4c0d9f54bd26c6e94e54c82cf2b6dd408 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Peter=20Str=C3=B6mberg?= <pez@pezius.com>
Date: Tue, 5 Nov 2024 14:34:17 +0100
Subject: [PATCH] Fix messes up shell out call

---
 scripts/publish.clj | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/scripts/publish.clj b/scripts/publish.clj
index f31c9bf..27e9922 100755
--- a/scripts/publish.clj
+++ b/scripts/publish.clj
@@ -44,7 +44,10 @@
 
 (defn tag [version dry-run?]
   (println "Tagging with version" version)
-  util/throw-if-error)
+  (util/sh dry-run?
+           "git" "tag"
+           "-a" (str "v" version)
+           "-m" (str "Version " version)))
 
 (defn push [dry-run?]
   (println "Pushing")