Lot T4 : les tests d'avant suivent le seed de T4 sans rien perdre de ce qu'ils prouvent

Les tests qui lisaient F, N ou O rejouent leurs transitions sur le seed de M8
(tests/fixtures/seed-m8) : seed_quorum_texts, seed_rules, seed_proposals, api,
quorum ; ils disent en plus que ces amendements sont dépassés par le retrait
(superseded_by). Les comptes suivent le document de T4 : 27 articles, quatre
Propositions seed (I1, E1, E12, E2), 33 modules à voter (27 articles, le titre,
l'ordre de 5 sections). modules.rs : l'ordre sous vote se rejoue sur
« conclusion » (K1, K2) ; « un ordre d'un seul article n'a rien à décider » sur
une base née du seed de M8 (O1). seed_amend : tests unitaires de
Version::SeedProposal et de la ligne seed_proposal (put_forward). order.rs ne lit
que les colonnes d'avant 0012 : sections_now ne sert qu'à la naissance des
modules, et article_amend n'en garde que les articles vivants.

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>

crates/ld-server/src/order.rs

@@ -37,14 +37,14 @@ pub async fn sections_now(conn: &mut SqliteConnection, doc_id: &str) -> sqlx::Re
         position: f64,
         visible: bool,
     }
-    // Seen: a text in force, or an open version (`DocState::members` says the same); never a
-    // unit out of the document (ADR 0014).
+    // Seen: a text in force, or an open version (`DocState::members` says the same). It reads
+    // only the columns of before 0012: a document born now, or given its modules by an
+    // amendment, holds no retired unit (ADR 0014); `article_amend` keeps the live ones.
     let rows = sqlx::query_as::<_, Row>(
         "SELECT u.id, u.section, u.position,
                 (u.in_force_id IS NOT NULL OR EXISTS (SELECT 1 FROM proposals p
                    WHERE p.unit_id = u.id AND p.status = 'open' AND p.kind IN ('text', 'remove'))) AS visible
-           FROM units u WHERE u.doc_id = ? AND u.kind = 'article' AND u.retired_at IS NULL
-          ORDER BY u.position, u.id",
+           FROM units u WHERE u.doc_id = ? AND u.kind = 'article' ORDER BY u.position, u.id",
     )
     .bind(doc_id)
     .fetch_all(&mut *conn)