diff --git a/.quire/ci.fnl b/.quire/ci.fnl
index e6db951..e2388ba 100644
--- a/.quire/ci.fnl
+++ b/.quire/ci.fnl
@@ -9,7 +9,7 @@
            (let [date (-> (sh "date --utc +%Y-%m-%d")
                           (. :stdout)
                           (: :gsub "\n$" ""))
-                 tag (.. :v date "+" (sha:sub 1 12))
+                 tag (.. :v date "+" (sha:sub 1 8))
                  encoded (-> (sh "printf '%s' \"$T\" | base64 --wrap=0"
                                  {:env {:T (.. "x-access-token:" token)}})
                              (. :stdout))