Migrate .quire/ci.fnl from ci.mirror shim to direct job + stdlib.mirror
The (ci.mirror …) shim is being removed. This rewrites the pipeline
to register a quire/mirror job directly, calling stdlib.mirror with
the same semantics (ref gating on refs/heads/main, same tag format).

Assisted-by: GLM-5.1 via pi
change xlwlrwuwnzmykqwxntvqxykpnypxplsq
commit 020070e98a2a072668978b6c827fc4d833e471df
author Alpha Chen <alpha@kejadlen.dev>
date
parent ltknkvsm
diff --git a/.quire/ci.fnl b/.quire/ci.fnl
index 03a0bce..9629a3c 100644
--- a/.quire/ci.fnl
+++ b/.quire/ci.fnl
@@ -1,10 +1,16 @@
-(local {: job : mirror} (require :quire.ci))
+(local {: job} (require :quire.ci))
 (import-macros {: defrun} :quire.ci)
+(local {: mirror} (require :quire.stdlib))
 
 ; (job :test [:quire/push] (defrun [{: sh}] (sh [:cargo :test])))
 
-(mirror "https://github.com/kejadlen/quire.git"
-        {:refs [:refs/heads/main]
-         :secret :github_auth_header
-         :tag (fn [{: sha}]
-                (.. :v (os.date "!%Y-%m-%d") "-" (sha:sub 1 8)))})
+(job "quire/mirror" [:quire/push]
+  (defrun [jobs secret]
+    (let [push (jobs :quire/push)]
+      (when (= push.ref "refs/heads/main")
+        (mirror {:url "https://github.com/kejadlen/quire.git"
+                 :auth-header (secret :github_auth_header)
+                 :sha push.sha
+                 :tag (.. "v" (os.date "!%Y-%m-%d") "-" (push.sha:sub 1 8))
+                 :git-dir push.git-dir
+                 :refs ["refs/heads/main"]})))))