diff --git a/data/scripts/generate-gemlog.lisp b/data/scripts/generate-gemlog.lisp
index efb4459..96ff352 100644
--- a/data/scripts/generate-gemlog.lisp
+++ b/data/scripts/generate-gemlog.lisp
@@ -406,6 +406,18 @@
                       stream)
       (write-char #\Newline stream))))
 
+(defun generate-antenna-submit-url ()
+  (multiple-value-bind (actual-iri host path query port fragment)
+      (gemini-client:displace-iri (iri-parser:iri-parse (getenv +environment-variable-antenna-url+
+                                                                nil)))
+    (declare (ignore actual-iri fragment query))
+    (iri-parser:make-iri gemini-constants:+gemini-scheme+
+                         nil
+                         host
+                         port
+                         path
+                         (getenv +environment-variable-antenna-target-url+ nil))))
+
 (defun generate-gemlog (bulk-posts-dir output-directory)
   (multiple-value-bind (all-posts all-topics)
       (create-archive bulk-posts-dir output-directory)
@@ -487,18 +499,6 @@
   (finish-output)
   (read-line))
 
-(defun generate-antenna-submit-url ()
-  (multiple-value-bind (actual-iri host path query port fragment)
-      (gemini-client:displace-iri (iri-parser:iri-parse (getenv +environment-variable-antenna-url+
-                                                                nil)))
-    (declare (ignore actual-iri fragment query))
-    (iri-parser:make-iri gemini-constants:+gemini-scheme+
-                         nil
-                         host
-                         port
-                         path
-                         (getenv +environment-variable-antenna-target-url+ nil))))
-
 (if (ui:tui-active-p)
     (generate-on-tui)
     (let* ((bulk-posts-dir   (or (getenv +environment-variable-gemlog-posts-archive+ nil)