You are a constitutional council ranking individual git commits for ownership allocation.

Compare these two commits. Decide which contributed more lasting value to the project.

Judge substance, not spectacle:
- Prefer correct, lasting design and real bugfixes over churn, formatting, renames, or generated noise.
- Prefer clarity and necessity over sheer line count. A small precise change can beat a large diffuse one.
- Do not favor a side merely because its patch is longer or noisier.
- Weight what the change does for the project, not the contributor's name.

Return ONLY a JSON object: {"winner": "A" or "B", "ratio": "N:M", "explanation": "..."}
The explanation must cite concrete differences in the patches (1-3 sentences).

Side A — contributor: tommy-mor
Side A — commit message:
[893a2007] fullscreen?

Side A — unified diff (full patch):
diff --git a/agents.md b/agents.md
index d9a924d2f77c444d9b112bbf37a480b963ace4f0..1f66ddbeddd1e40310947c7eb474c1ac4858bc42 100644
--- a/agents.md
+++ b/agents.md
@@ -37,9 +37,9 @@ Strict **CSP** that blocks `eval` would break the current app. Other projects ma
 
 - **Non-morph `POST /ui` responses:** **`SetGardenPin`** returns **`303 See Other`** and **`Set-Cookie`** (same as **`POST /theme`**). Garden pin/unpin is a normal **`<form method="POST" action="/ui" data-navigate="full">`** — browser navigation applies cookies reliably (see **`test/browser_garden_pin.clj`**). Each **`__rpc__`** payload includes **`form_action: "/ui"`**; **`post_ui_html`** rejects mismatches to bind tokens to the UI endpoint.
 
-- **`VoteComparePost`:** On success returns **`text/javascript`** that **morphs** **`#vote-compare-preview`** (new ingest card) and **`#vote-edge-history-region`** (recomputed edge list). Uses **`RpcResult::PostOk`**’s **`post_id`** / **`post_index`** for the card. **`__rpc__`** carries **`form_action: "/ui"`**; **`thread_tag`** and ratio fields come from the same form as **`$form`** holes.
+- **`VoteComparePost`:** On success returns **`text/javascript`** that **morphs** **`#vote-compare-preview`** (new ingest card), **`#vote-edge-history-region`** (recomputed **`<ul>`** — ratios match **`left`/`right`** query order, bullets, sorted by strength toward **`left`** then newer). The compare **`GET`** page uses **`layout_full_bleed_chromeless`** (no breadcrumbs, no **`#controls`**, no **`slug-pin-hud`**; **`view-vote-compare-fullscreen`** full-width **`body`**). **`__rpc__`** carries **`form_action: "/ui"`**; **`thread_tag`** and ratio fields come from the same form as **`$form`** holes.
 
-- **Garden pin / compare voting:** Cookie **`slug_garden_pin`** via **`set_garden_pin`**. Pairwise UI: **`GET /vote/compare?…`** / **`GET /r/:room_key/vote/compare?…`**. HUD: **`#slug-pin-hud`** when **`layout`** passes garden metadata on **`body`**; the label is **`POST /ui`** **`set_garden_pin`** **`clear:true`** (**`slug_ui.js`**), not a permalink to the item.
+- **Garden pin / compare voting:** Cookie **`slug_garden_pin`** via **`set_garden_pin`**. Pairwise UI: **`GET /vote/compare?…`** / **`GET /r/:room_key/vote/compare?…`** (fullscreen **`GET`** page: no HUD; other garden pages). HUD (**`#slug-pin-hud`**): only when **`layout`** passes garden metadata on **`body`**; the label is **`POST /ui`** **`set_garden_pin`** **`clear:true`** (**`slug_ui.js`**), not a permalink to the item.
 
 **Rule of thumb:** New **CLI or API** verbs → `RpcCommand`. New **in-page morph or form-driven** behavior that only makes sense in the browser → `HtmlUiAction`. If both need the same operation, implement the real work once (e.g. call shared RPC helpers from `post_ui_html`) and keep the wire shapes separate.
 
diff --git a/server/src/api/ui_html.rs b/server/src/api/ui_html.rs
index 5aa6a86326ba3545d261322c010e02fe86ee1c57..696e7b3605e2e68aee0351116c494c2958506add 100644
--- a/server/src/api/ui_html.rs
+++ b/server/src/api/ui_html.rs
@@ -254,7 +254,17 @@ async fn dispatch_ui_action(
                         };
                         n
                     };
-                    let js = vote_compare_post_success_js(state, &nav, &left_id, &right_id).await;
+                    let js = vote_compare_post_success_js(
+                        state,
+                        &nav,
+                        &room,
+                        &thread_tag,
+                        &left_id,
+                        &right_id,
+                        pid.as_str(),
+                        post_index,
+                    )
+                    .await;
                     Response::builder()
                         .status(StatusCode::OK)
                         .header(header::CONTENT_TYPE, "text/javascript; charset=utf-8")
diff --git a/server/src/html/garden.rs b/server/src/html/garden.rs
index 121d9498e8cb93d4d001dc1bbce23d74fbb958f5..41f9e9c64a80a55a9d3ece2a6a1f592cf5e8d8dd 100644
--- a/server/src/html/garden.rs
+++ b/server/src/html/garden.rs
@@ -22,17 +22,17 @@ use crate::{
     },
     events::ThreadCapability,
     path_types::ItemId,
-    reducer::{ContentState, ReducerState, ScopeId},
+    reducer::{scope_from_room_wire, ContentState, ReducerState, ScopeId},
     scope_rank::{build_children_rankings, ChildrenRankings},
     state::AppState,
     timeago,
 };
 
 use super::{
-    bc_path, bc_path_external, bc_segment, cli_panel, layout, now_ms, ratio_pct,
-    render_linkified_with_embeds_in_scope, theme_from_jar, theme_next_from_uri,
+    bc_path, bc_path_external, bc_segment, cli_panel, layout, layout_full_bleed_chromeless, now_ms,
+    ratio_pct, render_linkified_with_embeds_in_scope, theme_from_jar, theme_next_from_uri,
     breadcrumb_path::{ExternalOntologyPath, OntologyPath},
-    forum::{ThreadNav},
+    forum::{ingest_entry_markup, ThreadNav},
 };
 
 /// `GET /vote/compare` — pairs `left` / `right` query params with optional `thread`.
@@ -89,25 +89,62 @@ fn canonical_edge_items(a: &ItemId, b: &ItemId) -> (ItemId, ItemId) {
     }
 }
 
-/// Votes whose endpoints are exactly this unordered pair, oldest first.
-fn votes_for_edge(content: &ContentState, a: &ItemId, b: &ItemId) -> Vec<crate::reducer::VoteData> {
+/// All votes whose endpoints are exactly this unordered pair (unsorted).
+fn edge_vote_entries_for_pair(content: &ContentState, a: &ItemId, b: &ItemId) -> Vec<crate::reducer::VoteData> {
     let (lo, hi) = canonical_edge_items(a, b);
     let lo_s = lo.as_str();
     let hi_s = hi.as_str();
-    let mut out: Vec<crate::reducer::VoteData> = content
+    content
         .item_votes
         .get(&lo)
         .into_iter()
         .flat_map(|q| q.iter())
         .filter(|v| {
-            let touches = (v.a.as_str() == lo_s && v.b.as_str() == hi_s)
-                || (v.a.as_str() == hi_s && v.b.as_str() == lo_s);
-            touches
+            (v.a.as_str() == lo_s && v.b.as_str() == hi_s)
+                || (v.a.as_str() == hi_s && v.b.as_str() == lo_s)
         })
         .cloned()
-        .collect();
-    out.sort_by_key(|v| v.ts);
-    out
+        .collect()
+}
+
+fn ratios_for_compare_page(v: &crate::reducer::VoteData, page_left: &ItemId, page_right: &ItemId) -> (i32, i32) {
+    let pl = page_left.as_str();
+    let pr = page_right.as_str();
+    match (v.a.as_str(), v.b.as_str()) {
+        (a, b) if a == pl && b == pr => (v.ratio_left, v.ratio_right),
+        (a, b) if a == pr && b == pl => (v.ratio_right, v.ratio_left),
+        _ => (v.ratio_left, v.ratio_right),
+    }
+}
+
+fn left_share_normalized(ratio_left: i32, ratio_right: i32) -> f64 {
+    let l = ratio_left.max(0) as f64;
+    let r = ratio_right.max(0) as f64;
+    let sum = l + r;
+    if sum <= 0.0 {
+        0.5
+    } else {
+        l / sum
+    }
+}
+
+/// Stronger preference for **`page_left` first**; ties **newer first**.
+fn sort_votes_for_compare_display(
+    mut votes: Vec<crate::reducer::VoteData>,
+    page_left: &ItemId,
+    page_right: &ItemId,
+) -> Vec<crate::reducer::VoteData> {
+    votes.sort_by(|va, vb| {
+        let (ratio_left_a, ratio_right_a) = ratios_for_compare_page(va, page_left, page_right);
+        let (ratio_left_b, ratio_right_b) = ratios_for_compare_page(vb, page_left, page_right);
+        let sa = left_share_normalized(ratio_left_a, ratio_right_a);
+        let sb = left_share_normalized(ratio_left_b, ratio_right_b);
+        match sb.partial_cmp(&sa).unwrap_or(std::cmp::Ordering::Equal) {
+            std::cmp::Ordering::Equal => vb.ts.cmp(&va.ts),
+            o => o,
+        }
+    });
+    votes
 }
 
 /// Number of vote ingests recorded for this unordered pair in `content` (same scope as ranking).
@@ -144,39 +181,40 @@ fn vote_edge_history_markup(
     content: &ContentState,
     left: &ItemId,
     right: &ItemId,
-    nav: &ThreadNav,
 ) -> maud::Markup {
-    let votes = votes_for_edge(content, left, right);
-    let (lo, hi) = canonical_edge_items(left, right);
+    let votes = edge_vote_entries_for_pair(content, left, right);
+    let votes = sort_votes_for_compare_display(votes, left, right);
+    let legend_left = item_display_path(left.as_str());
+    let legend_right = item_display_path(right.as_str());
     html! {
         @if votes.is_empty() {
             p class="muted vote-edge-empty" { "no votes on this pair in this scope yet" }
         } @else {
-            h3 class="vote-edge-history-title" { "votes on this edge" }
-            ol class="vote-edge-history" {
+            h3 class="vote-edge-history-title" {
+                "votes on this edge"
+                span class="vote-edge-history-axis muted" { " · " (legend_left) " : " (legend_right) }
+            }
+            ul class="vote-edge-history" {
                 @for v in &votes {
-                    @let (ratio_lo, ratio_hi) = if v.a == lo && v.b == hi {
-                        (v.ratio_left, v.ratio_right)
-                    } else {
-                        (v.ratio_right, v.ratio_left)
-                    };
-                    @let pct = ratio_pct(ratio_lo, ratio_hi);
-                    @let left_class = if lo.as_str() == left.as_str() { "ratio-left current" } else { "ratio-left" };
-                    @let right_class = if hi.as_str() == left.as_str() { "ratio-right current" } else { "ratio-right" };
-                    li class="vote-edge-history-row" {
+                    @let (r_left, r_right) = ratios_for_compare_page(v, left, right);
+                    @let pct = ratio_pct(r_left, r_right);
+                    @let row_tip = format!(
+                        "{}:{} counts toward {} (left of bar) vs {} (right of bar); #{} · @{}",
+                        r_left,
+                        r_right,
+                        legend_left,
+                        legend_right,
+                        v.thread_tag,
+                        v.principal,
+                    );
+                    li class="vote-edge-history-row" title=(row_tip) {
                         div class="vote-edge-meta" {
-                            a href=(nav.garden_item_href(&lo)) {
-                                code { (item_display_path(lo.as_str())) }
-                            }
-                            span class="vote-edge-ratio" { (format!("{}:{}", ratio_lo, ratio_hi)) }
-                            a href=(nav.garden_item_href(&hi)) {
-                                code { (item_display_path(hi.as_str())) }
-                            }
+                            span class="vote-edge-ratio" { (format!("{}:{}", r_left, r_right)) }
                             span class="muted" { " · #" (v.thread_tag) " · @" (v.principal) }
                         }
-                        div class="ratio-bar vote-edge-bar" {
-                            div class=(left_class) style={(format!("width: {:.3}%;", pct))} {}
-                            div class=(right_class) style={(format!("width: {:.3}%;", 100.0 - pct))} {}
+                        div class="ratio-bar vote-edge-bar" aria-hidden="true" {
+                            div class="ratio-left" style={(format!("width: {:.3}%;", pct))} {}
+                            div class="ratio-right" style={(format!("width: {:.3}%;", 100.0 - pct))} {}
                         }
                         @if !v.body.trim().is_empty() {
                             div class="vote-edge-reason muted" { (v.body.trim()) }
@@ -192,14 +230,33 @@ fn vote_edge_history_markup(
 pub(crate) async fn vote_compare_post_success_js(
     state: &AppState,
     nav: &ThreadNav,
+    room_wire: &str,
+    thread_tag: &str,
     left: &ItemId,
     right: &ItemId,
+    post_id: &str,
+    post_idx: Option<usize>,
 ) -> String {
     let reduced = state.reduced.read().await;
+    let scope = scope_from_room_wire(room_wire);
+    let Some(ing) = reduced.ingests_by_id.get(post_id).cloned() else {
+        drop(reduced);
+        return "console.warn('vote compare: new post not found');".to_string();
+    };
+    let idx = match post_idx {
+        Some(i) => i,
+        None => reduced
+            .try_thread_post_index_chronological(&scope, thread_tag, post_id)
+            .unwrap_or(0),
+    };
+    let viewer = None::<&str>;
+    let now = now_ms();
     let content = content_for_garden_view(&reduced, &nav.scope());
-    let edge_history = vote_edge_history_markup(content, left, right, nav);
+    let edge_history = vote_edge_history_markup(content, left, right);
+    let card = ingest_entry_markup(nav, thread_tag, idx, &ing, viewer, now, &reduced);
     drop(reduced);
     let mut b = JsBuilder::new();
+    b = b.morph_inner_selector("#vote-compare-preview", card);
     b = b.morph_inner_selector("#vote-edge-history-region", edge_history);
     b.build()
 }
@@ -1259,7 +1316,7 @@ async fn vote_compare_inner(
         .filter(|t| !t.is_empty())
         .unwrap_or_else(|| pick_autothread_for_vote_pair(content, &left, &right));
     let thread_tags = vote_thread_tags_for_pair(content, &left, &right);
-    let edge_history = vote_edge_history_markup(content, &left, &right, &nav);
+    let edge_history = vote_edge_history_markup(content, &left, &right);
     drop(reduced);
 
     let title = format!("vote — {} vs {}", item_display_path(left.as_str()), item_display_path(right.as_str()));
@@ -1282,15 +1339,6 @@ async fn vote_compare_inner(
     .expect("vote compare rpc json");
 
     let body = html! {
-        nav class="breadcrumb" {
-            a href="/" { "slug.social" }
-            @let vote_bc_href = if nav.room_path_prefix_for_vote_compare().is_empty() {
-                "/vote/compare".to_string()
-            } else {
-                format!("{}/vote/compare", nav.room_path_prefix_for_vote_compare())
-            };
-            (bc_segment("vote", &vote_bc_href, true))
-        }
         section class="vote-compare-shell" {
             h2 { "compare" }
             div class="vote-compare-pair" {
@@ -1305,6 +1353,10 @@ async fn vote_compare_inner(
             div id="vote-edge-history-region" {
                 (edge_history)
             }
+            div class="vote-compare-preview-wrap" {
+                h3 { "your vote (after post)" }
+                div id="vote-compare-preview" class="vote-compare-preview" {}
+            }
             @if can_post {
                 form id="vote-compare-form" method="POST" action="/ui" {
                     input type="hidden" name=(UI_RPC_FIELD) value=(rpc_json);
@@ -1342,16 +1394,12 @@ async fn vote_compare_inner(
         }
     };
 
-    let (gr, gp) = garden_layout_meta(&nav);
-    let page = layout(
+    let page = layout_full_bleed_chromeless(
         &title,
-        "view-ontology view-ontology-light view-vote-compare",
+        "view-ontology view-ontology-light view-vote-compare view-vote-compare-fullscreen",
         body,
-        None,
         theme_from_jar(&jar),
         &theme_next_from_uri(&uri),
-        Some(&gr),
-        Some(&gp),
     );
     Html(page.into_string()).into_response()
 }
@@ -1388,10 +1436,40 @@ mod tests {
         }));
     }
 
+    #[test]
+    fn vote_edge_compare_sorts_rows_by_strength_for_page_left() {
+        use super::{
+            content_for_garden_view, edge_vote_entries_for_pair, ratios_for_compare_page,
+            sort_votes_for_compare_display,
+        };
+        use crate::path_types::ItemId;
+        let mut reduced = ReducerState::default();
+        apply_ingest(
+            &mut reduced,
+            1,
+            "@00000000-0000-0000-0000-000000000000:test:local/test\n\
+             ~/topic {root}\n\
+             ~/topic/a {alpha}\n\
+             ~/topic/b {beta}\n\
+             ~/topic/a 1:9 ~/topic/b {weak for a}\n\
+             ~/topic/a 8:2 ~/topic/b {strong for a}\n",
+        );
+        let content = content_for_garden_view(&reduced, &ScopeId::Public);
+        let page_left = ItemId::parse("~/topic/a").unwrap().normalized_storage();
+        let page_right = ItemId::parse("~/topic/b").unwrap().normalized_storage();
+        let raw = edge_vote_entries_for_pair(content, &page_left, &page_right);
+        assert_eq!(raw.len(), 2);
+        let sorted = sort_votes_for_compare_display(raw, &page_left, &page_right);
+        let (r0, _) = ratios_for_compare_page(&sorted[0], &page_left, &page_right);
+        assert_eq!(r0, 8, "stronger left weight should sort first");
+        let (r1, _) = ratios_for_compare_page(&sorted[1], &page_left, &page_right);
+        assert_eq!(r1, 1);
+    }
+
     #[test]
     fn edge_vote_count_for_pair_matches_votes_for_edge_len() {
         use super::{
-            content_for_garden_view, edge_vote_count_for_pair, votes_for_edge,
+            content_for_garden_view, edge_vote_count_for_pair, edge_vote_entries_for_pair,
         };
         use crate::path_types::ItemId;
         let mut reduced = ReducerState::default();
@@ -1410,9 +1488,9 @@ mod tests {
         let b = ItemId::parse("~/topic/b").unwrap().normalized_storage();
         assert_eq!(
             edge_vote_count_for_pair(content, &a, &b),
-            votes_for_edge(content, &a, &b).len()
+            edge_vote_entries_for_pair(content, &a, &b).len()
         );
-        assert_eq!(votes_for_edge(content, &a, &b).len(), 2);
+        assert_eq!(edge_vote_entries_for_pair(content, &a, &b).len(), 2);
     }
 
     #[test]
diff --git a/server/src/html/mod.rs b/server/src/html/mod.rs
index 40c15debe91a708da24dc1dec2ece2a852dd6381..f57b66f510dfaade1b656990fb2cbb30d16e5bf1 100644
--- a/server/src/html/mod.rs
+++ b/server/src/html/mod.rs
@@ -304,6 +304,28 @@ pub(super) fn layout(
     layout_embed_controls(title, view, body, views, theme, theme_next, garden_room_wire, garden_path_prefix, true)
 }
 
+/// Minimal document shell: no bottom controls, no garden HUD data attributes (`data-garden-room` /
+/// `data-garden-prefix` empty). For routes that own the full viewport (e.g. vote compare).
+pub(super) fn layout_full_bleed_chromeless(
+    title: &str,
+    view: &str,
+    body: Markup,
+    theme: &str,
+    theme_next: &str,
+) -> Markup {
+    layout_embed_controls(
+        title,
+        view,
+        body,
+        None,
+        theme,
+        theme_next,
+        None,
+        None,
+        false,
+    )
+}
+
 fn layout_embed_controls(
     title: &str,
     view: &str,
diff --git a/server/static/theme_default.css b/server/static/theme_default.css
index 9178f0629cfb868348740e6dea1626dc6afb8345..a441c4f79d8cf88f5a8240f9992f47dbbd1ab46b 100644
--- a/server/static/theme_default.css
+++ b/server/static/theme_default.css
@@ -1054,6 +1054,26 @@ body.view-vote-compare #vote-explain:focus {
 body.view-vote-compare #vote-compare-form button[type="submit"] {
   margin-top: 6px;
 }
+
+body.view-vote-compare-fullscreen {
+  max-width: none;
+  width: 100%;
+  margin-left: 0;
+  margin-right: 0;
+  padding: clamp(8px, 2.5vw, 28px);
+  padding-bottom: max(20px, env(safe-area-inset-bottom, 0px));
+  padding-top: max(8px, env(safe-area-inset-top, 0px));
+  min-height: 100vh;
+  min-height: 100dvh;
+  box-sizing: border-box;
+}
+body.view-vote-compare-fullscreen .vote-compare-shell {
+  max-width: none;
+  width: 100%;
+  box-sizing: border-box;
+  margin: 0;
+}
+
 .vote-edge-history-title {
   font-size: 12px;
   letter-spacing: 0.06em;
@@ -1061,9 +1081,15 @@ body.view-vote-compare #vote-compare-form button[type="submit"] {
   color: var(--meta);
   margin: 16px 0 8px;
 }
-ol.vote-edge-history {
+.vote-edge-history-axis {
+  text-transform: none;
+  letter-spacing: normal;
+  font-size: 13px;
+}
+ul.vote-edge-history {
   margin: 0;
-  padding-left: 1.2em;
+  padding-left: 1.35em;
+  list-style-type: disc;
 }
 li.vote-edge-history-row {
   margin: 10px 0;
diff --git a/server/static/theme_retro.css b/server/static/theme_retro.css
index f2d0ddee113995817a7f9bfa8500b2f5e7d81cf4..373f15bbd75b62604cdd14b9f0fadda2d6176991 100644
--- a/server/static/theme_retro.css
+++ b/server/static/theme_retro.css
@@ -176,3 +176,21 @@ nav.breadcrumb.ont-sibling-nav span.ont-sibling-nav-group-sep {
   border-right: none;
   border-top: none;
 }
+
+body.view-vote-compare-fullscreen {
+  max-width: none;
+  width: 100%;
+  margin: 0;
+  padding: clamp(8px, 2.5vw, 20px);
+  padding-bottom: max(24px, env(safe-area-inset-bottom, 0px));
+  padding-top: max(8px, env(safe-area-inset-top, 0px));
+  min-height: 100vh;
+  min-height: 100dvh;
+  box-sizing: border-box;
+}
+body.view-vote-compare-fullscreen .vote-compare-shell {
+  max-width: none;
+  width: 100%;
+  box-sizing: border-box;
+  margin: 0;
+}
diff --git a/server/static/theme_retro_craft.css b/server/static/theme_retro_craft.css
index efaeed06d01fd835df0621f4c621c8f034c8b536..0871e3126c656ba534306cdc3f405f802d10b589 100644
--- a/server/static/theme_retro_craft.css
+++ b/server/static/theme_retro_craft.css
@@ -785,6 +785,24 @@ body.view-ontology.view-vote-compare .vote-compare-shell {
   border-radius: 3px;
   box-shadow: 0 1px 0 rgba(26, 24, 20, 0.06);
 }
+body.view-ontology.view-vote-compare.view-vote-compare-fullscreen .vote-compare-shell {
+  max-width: none;
+  width: 100%;
+  min-height: calc(100dvh - clamp(20px, 5vw, 56px));
+  margin: 0;
+  box-sizing: border-box;
+}
+body.view-vote-compare-fullscreen {
+  max-width: none !important;
+  width: 100%;
+  margin: 0 !important;
+  padding: clamp(6px, 2vw, 1.75rem);
+  padding-bottom: max(1.25rem, env(safe-area-inset-bottom, 0px));
+  padding-top: max(6px, env(safe-area-inset-top, 0px));
+  min-height: 100vh;
+  min-height: 100dvh;
+  box-sizing: border-box;
+}
 body.view-ontology.view-vote-compare .vote-compare-shell > h2 {
   margin-top: 0;
   font-size: 0.7rem;
@@ -910,9 +928,16 @@ body.view-ontology .vote-edge-history-title {
   color: #5c574e;
   margin: 0 0 0.5rem;
 }
-body.view-ontology ol.vote-edge-history {
+body.view-ontology .vote-edge-history-axis {
+  text-transform: none;
+  letter-spacing: normal;
+  font-size: 0.82rem;
+  font-weight: 400;
+}
+body.view-ontology ul.vote-edge-history {
   margin: 0;
-  padding-left: 1.1rem;
+  padding-left: 1.25rem;
+  list-style-type: disc;
 }
 body.view-ontology li.vote-edge-history-row {
   margin: 0.65rem 0;
diff --git a/test/browser_vote_compare.clj b/test/browser_vote_compare.clj
index 26fcff8bceb0c10bcd5ddfdae1aa145b56b7a0d1..78fc40c160c84478ab8ee0d953b9ed878b4c712f 100644
--- a/test/browser_vote_compare.clj
+++ b/test/browser_vote_compare.clj
@@ -72,13 +72,13 @@
                (is (wait-for-text pg "body" "@alice" 15000) "alice session after login")
                (page/navigate pg cmp-url)
                (is (wait-for-text pg ".vote-compare-shell" "compare" 15000) "vote compare shell")
-               (is (wait-for-text pg "ol.vote-edge-history" "seed edge vote" 15000)
+               (is (wait-for-text pg "ul.vote-edge-history" "seed edge vote" 15000)
                    "edge history lists canonical-order vote")
                (locator/fill (page/locator pg "#vote-explain") "because playwright says so")
                (locator/click (page/locator pg "#vote-compare-form button[type=submit]"))
                (is (wait-for-text pg "#vote-compare-preview" "because playwright" 20000)
                    "preview region morphs new post card")
-               (is (wait-for-text pg "ol.vote-edge-history" "because playwright" 20000)
+               (is (wait-for-text pg "ul.vote-edge-history" "because playwright" 20000)
                    "new vote appears in edge history after morph"))))))
 
      (finally


Side B — contributor: tommy-mor
Side B — commit message:
[6120bd96] fix redirect urls for custom hosts and deploy from staging

Use HOSTNAME and window.location.origin instead of hardcoded staging.sorter.social, and trigger fly deploys on pushes to staging.

Co-authored-by: Cursor <cursoragent@cursor.com>

Side B — unified diff (full patch):
diff --git a/.github/workflows/fly-deploy.yml b/.github/workflows/fly-deploy.yml
index 3e693915fe6f99a5c2221b2921bf8ebc305180fc..5e11e5c312f62bed34d8cc68bd4a5538f52476b9 100644
--- a/.github/workflows/fly-deploy.yml
+++ b/.github/workflows/fly-deploy.yml
@@ -3,11 +3,11 @@ name: deploy to fly.io
 on:
   push:
     branches:
-      - main
+      - staging
   workflow_dispatch:
 
 concurrency:
-  group: fly-deploy-main
+  group: fly-deploy-staging
   cancel-in-progress: true
 
 jobs:
diff --git a/borter/src/app/linear.clj b/borter/src/app/linear.clj
index f77d8a974e0cf05f9c33233bb625bdb190d2007b..5ef0e34cf1d543826675c6facb66aec079b40561 100644
--- a/borter/src/app/linear.clj
+++ b/borter/src/app/linear.clj
@@ -6,6 +6,7 @@
             [ring.util.response :as response]
             [app.database :as db]
             [app.permissions :as perms]
+            [app.util :as util]
             [honey.sql.helpers :as h]
             [sluj.core :refer [sluj]]))
 
@@ -13,9 +14,7 @@
 (def client-secret (System/getenv "BORTER_LINEAR_CLIENT_SECRET"))
 
 (defn get-hostname []
-  (case (.getCanonicalHostName (java.net.InetAddress/getLocalHost))
-    "sorter.social" "https://sorter.social/api/linear/callback"
-    "http://localhost:3000/api/linear/callback"))
+  (str (util/get-base-url) "/api/linear/callback"))
 
 (defn code->token [code]
   (def code code)
diff --git a/borter/src/app/login.clj b/borter/src/app/login.clj
index 5d545db9bef7765ba8b3fe7d00261c8ce84e9e1a..86817f8e94bc174e5b108859cc0b342953ab7acb 100644
--- a/borter/src/app/login.clj
+++ b/borter/src/app/login.clj
@@ -1,6 +1,7 @@
 (ns app.login
   (:require [crypto.password.bcrypt :as password]
             [app.database :as db]
+            [app.util :as util]
             [honey.sql.helpers :as h]
             [hato.client :as hc]
             [clojure.data.json :as json]
@@ -12,10 +13,7 @@
 (def environment (or (System/getenv "ENVIRONMENT") "development"))
 
 (defn get-base-url []
-  (case environment
-    "production" "https://sorter.social"
-    "staging" "https://staging.sorter.social"
-    "development" "http://localhost:3000"))  ; fallback for development
+  (util/get-base-url))
 
 (defn create-email-content
   "Creates a standardized email structure with customizable content"
diff --git a/borter/src/app/oauth.clj b/borter/src/app/oauth.clj
index 1166f2ee30c9e813840711c72d1ad8f1c62e1ffe..2cd0c62f1fe267f7f5f725a97bc3ba0d0889517f 100644
--- a/borter/src/app/oauth.clj
+++ b/borter/src/app/oauth.clj
@@ -3,6 +3,7 @@
             [clojure.data.json :as json]
             [hato.client :as hc]
             [app.database :as db]
+            [app.util :as util]
             [honey.sql.helpers :as h]
             [ring.util.codec :as codec])
   (:import [java.util Base64]))
@@ -13,12 +14,7 @@
     encoded-bytes))
 
 (defn get-hostname []
-  (let [env (System/getenv "ENVIRONMENT")]
-    (println "Current environment:" env)
-    (case env
-      "production" "https://sorter.social"
-      "staging" "https://staging.sorter.social"
-      "http://localhost:3000")))
+  (util/get-base-url))
 
 (defn get-origin-hostname [req]
   (let [origin (get-in req [:headers "origin"])
diff --git a/borter/src/app/spotify.clj b/borter/src/app/spotify.clj
index 3e11713119141812fa2707ec956fb7ed612ee69a..b38d734351a1d4f1e142d93d4435ffe7bd20c02d 100644
--- a/borter/src/app/spotify.clj
+++ b/borter/src/app/spotify.clj
@@ -1,5 +1,6 @@
 (ns app.spotify
   (:require [app.oauth :as oauth]
+            [app.util :as util]
             [hato.client :as hc]
             [clojure.data.json :as json]
             [ring.util.codec :as codec]
@@ -47,10 +48,7 @@
 
 
 (defn get-hostname []
-  (case (System/getenv "ENVIRONMENT")
-    "production" "https://sorter.social"
-    "staging" "https://staging.sorter.social"
-    "http://localhost:3000"))
+  (util/get-base-url))
 
 (defn create-spotify-tag
   "Creates a tag for a Spotify entity (artist, album, track) if it doesn't exist"
diff --git a/borter/src/app/twitter.clj b/borter/src/app/twitter.clj
index ef7b18fa1fcb82bb944b3035ffed44499181237f..b9a3fdccc15d13918a4d11d8c0443de94fd172b4 100644
--- a/borter/src/app/twitter.clj
+++ b/borter/src/app/twitter.clj
@@ -1,6 +1,7 @@
 (ns app.twitter
   (:require [app.database :as db]
             [app.permissions :as perms]
+            [app.util :as util]
             [honey.sql.helpers :as h]
             [hato.client :as hc]
             [clojure.data.json :as json]
@@ -37,9 +38,7 @@
   (clojure.string/join "&" (map (fn [[k v]] (str (name k) "=" v)) params)))
 
 (defn get-hostname []
-  (case (.getCanonicalHostName (java.net.InetAddress/getLocalHost))
-    "sorter.isnt.online" "https://sorter.isnt.online/api/twitter/callback"
-    "http://localhost:3000/api/twitter/callback"))
+  (str (util/get-base-url) "/api/twitter/callback"))
 
 (defn encode-b64 [s]
   (.encodeToString (java.util.Base64/getEncoder) (.getBytes s)))
diff --git a/borter/src/app/util.clj b/borter/src/app/util.clj
index 384a64306c84aa8288ec44cd5de57edc248a826d..6a8aa0875accb28dc81bf57e645e3961b0a3ace5 100644
--- a/borter/src/app/util.clj
+++ b/borter/src/app/util.clj
@@ -2,6 +2,18 @@
   (:require [clojure.string :as string])
   (:import [java.net URLEncoder]))
 
+(defn get-base-url
+  "Public site base URL for redirects and oauth callbacks."
+  []
+  (if-let [hostname (not-empty (System/getenv "HOSTNAME"))]
+    (if (string/starts-with? hostname "http")
+      (string/replace hostname #"/$" "")
+      (str "https://" (string/replace hostname #"/$" "")))
+    (case (or (System/getenv "ENVIRONMENT") "development")
+      "production" "https://sorter.social"
+      "staging" "https://staging.sorter.social"
+      "http://localhost:3000")))
+
 (defn urlencode-params [params]
   (clojure.string/join "&" (map (fn [[k v]] (str k "=" (URLEncoder/encode (str v) "UTF-8"))) params)))
 
diff --git a/borter/src/app/youtube.clj b/borter/src/app/youtube.clj
index 647ef7c6d4f2503a63a7c074d46dc815b2a23547..fc9a2f5ed516692f19e06b4c0221f510547cf8c0 100644
--- a/borter/src/app/youtube.clj
+++ b/borter/src/app/youtube.clj
@@ -6,6 +6,7 @@
             [ring.util.response :as response]
             [app.database :as db]
             [app.permissions :as perms]
+            [app.util :as util]
             [honey.sql.helpers :as h]
             [sluj.core :refer [sluj]]))
 
@@ -32,9 +33,7 @@
       :body (json/read-str {:key-fn keyword})))
 
 (defn get-hostname []
-  (case (.getCanonicalHostName (java.net.InetAddress/getLocalHost))
-    "localhost" "http://localhost:3000/api/youtube/callback"
-    "https://sorter.isnt.online/api/youtube/callback"))
+  (str (util/get-base-url) "/api/youtube/callback"))
 
 
 
diff --git a/forter/src/utils/authUtils.js b/forter/src/utils/authUtils.js
index 145e5db7ad6f7a6439d68c63beb4d07d31b2de08..98ed7fa671f9887f44dc1479d85569951eb4773e 100644
--- a/forter/src/utils/authUtils.js
+++ b/forter/src/utils/authUtils.js
@@ -5,8 +5,11 @@ import { current_session, fetchSession } from "../session";
 let lastSyncTime = 0;
 const SYNC_THROTTLE_MS = 5000; // Only sync once every 5 seconds
 
-// Get base URL based on Vite's mode
+// Get base URL based on current origin, with build-mode fallbacks for SSR/build
 const getBaseUrl = () => {
+  if (typeof window !== 'undefined' && window.location?.origin) {
+    return window.location.origin;
+  }
   switch (import.meta.env.MODE) {
     case 'production':
       return 'https://sorter.social';