fix: wire VideoCoordination panel into TEA architecture (108 panels)

VideoCoordination was orphaned — component/engine/commands existed but
were not integrated into the core loop. Now fully wired:
- Model.res: include + field + init
- Msg.res: videoCoordinationMsg type + dispatch variant
- PanelSwitcherModel: PanelVideoCoordination variant
- PanelRegistry: metadata entry
- View.res: routing
- Update.res: dispatch to UpdateVideoCoordination
- New: src/update/UpdateVideoCoordination.res

Oo7Toolchain was already fully wired — verified, no changes needed.

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>

Author: hyperpolymath

src/Model.res

@@ -105,6 +105,7 @@ include ProvenanceModel
 
 /// Re-export 007 Toolchain types for agentic compiler and high-rigor execution.
 include Oo7ToolchainModel
+include VideoCoordinationModel
 
 /// Re-export AI types (aiProviderId, aiProviderConfig, aiProviderStatus,
 /// aiMessage, aiCategory, aiState) for the multi-provider AI neural interface
@@ -418,6 +419,8 @@ type model = {
   aerie: aerieState,
   // 007 Toolchain — agentic compiler and high-rigor execution (Groove)
   oo7toolchain: oo7State,
+  // VideoCoordination — Drive-to-Photos batch transfer dashboard
+  videoCoordination: videoCoordinationState,
   // Interfaces — Idris2 ABI + Zig FFI inventory + binding coverage
   interfaces: interfacesState,
   // Playgrounds — code sandbox + NQC console + tutorials
@@ -1123,6 +1126,7 @@ let init = (): model => {
     activeCategory: Oo7Dashboard,
     nesyStatus: "Waiting for analysis...",
   },
+  videoCoordination: VideoCoordinationEngine.defaultState,
   interfaces: InterfacesEngine.defaultState,
   playgrounds: PlaygroundsEngine.defaultState,
   hypatia: HypatiaEngine.defaultState,

src/Msg.res

@@ -2734,6 +2734,15 @@ type oo7Msg =
   | LoadToolchain
   | ClearError
 
+/// Messages for the VideoCoordination panel — Drive-to-Photos batch transfers.
+type videoCoordinationMsg =
+  | StartTransfer(string, string) // source, destination
+  | PauseTransfer(string) // batchId
+  | RefreshStatus
+  | StatusResult(result<string, string>)
+  | TransferResult(result<string, string>)
+  | ClearError
+
 /// The unified message type
 type msg =
   | PaneL(paneLMsg)
@@ -2755,6 +2764,7 @@ type msg =
   | Reposystem(reposystemMsg) // RSR compliance auditing
   | Aerie(aerieMsg) // Network diagnostics
   | Oo7Toolchain(oo7Msg) // Agentic compiler and high-rigor execution
+  | VideoCoordination(videoCoordinationMsg) // Drive-to-Photos batch transfer dashboard
   | Interfaces(interfacesMsg) // ABI/FFI inventory
   | Playgrounds(playgroundsMsg) // Code sandbox
   | Minter(minterMsg) // Panel Minter wizard

src/Update.res

@@ -141,6 +141,7 @@ let update = (model: model, msg: msg): (model, Tea_Cmd.t<msg>) => {
   | Reposystem(subMsg) => updateReposystem(model, subMsg)
   | Aerie(subMsg) => updateAerie(model, subMsg)
   | Oo7Toolchain(subMsg) => updateOo7Toolchain(model, subMsg)
+  | VideoCoordination(subMsg) => UpdateVideoCoordination.updateVideoCoordination(model, subMsg)
   | Interfaces(subMsg) => updateInterfaces(model, subMsg)
   | Playgrounds(subMsg) => updatePlaygrounds(model, subMsg)
   | Minter(subMsg) => updateMinter(model, subMsg)

src/View.res

@@ -484,6 +484,7 @@ let renderActivePanel = (model: model): Tea_Vdom.t<msg> => {
   | Some(PanelDatabases) => Databases.view(model.databases)
   | Some(PanelAerie) => Aerie.view(model.aerie)
   | Some(PanelOo7Toolchain) => Oo7Toolchain.view(model.oo7toolchain)
+  | Some(PanelVideoCoordination) => VideoCoordination.view(model.videoCoordination)
   | Some(PanelInterfaces) => Interfaces.view(model.interfaces)
   | Some(PanelPlaygrounds) => Playgrounds.view(model.playgrounds)
   | Some(PanelMinter) => Minter.view(model.minter)

src/components/VideoCoordination.res

@@ -7,8 +7,6 @@
 /// - Quota usage visualisation (Daily 750GB limit)
 /// - ARIA-live regions for status updates
 
-open Model
-open Msg
 open Tea.Html
 open VideoCoordinationModel
 open VideoCoordinationEngine

src/model/PanelSwitcherModel.res

@@ -191,6 +191,8 @@ type panelId =
   | PanelIdaptikPlayerOverview
   /// 007 Toolchain — agentic compiler and high-rigor execution (Groove).
   | PanelOo7Toolchain
+  /// VideoCoordination — Drive-to-Photos batch transfer dashboard.
+  | PanelVideoCoordination
 
 /// Connection status for panels backed by external services.
 type connectionStatus =

src/modules/PanelRegistry.res

@@ -111,6 +111,16 @@ let allPanels: array<panelMeta> = [
     hasBackend: true,
     cladeId: Some("oo7-toolchain"),
   },
+  {
+    id: PanelVideoCoordination,
+    name: "Video Coordination",
+    shortName: "Video",
+    description: "Drive-to-Photos batch transfer dashboard",
+    icon: "video",
+    connectionStatus: ServiceDisconnected,
+    hasBackend: true,
+    cladeId: Some("video-coordination"),
+  },
   {
     id: PanelInterfaces,
     name: "Interfaces",

src/update/UpdateVideoCoordination.res

@@ -0,0 +1,32 @@
+// SPDX-License-Identifier: PMPL-1.0-or-later
+
+/// Extracted sub-updater for VideoCoordination panel.
+/// Manages batch transfer lifecycle, status polling, and error handling.
+
+open Model
+open Msg
+
+let updateVideoCoordination = (model: model, subMsg: videoCoordinationMsg): (model, Tea_Cmd.t<msg>) => {
+  let vc = model.videoCoordination
+  switch subMsg {
+  | StartTransfer(source, destination) =>
+    let newState = VideoCoordinationEngine.addBatch(vc, source, destination, 0)
+    ({...model, videoCoordination: {...newState, loading: true}}, Tea_Cmd.none)
+  | PauseTransfer(_batchId) => (model, Tea_Cmd.none)
+  | RefreshStatus => ({...model, videoCoordination: {...vc, loading: true}}, Tea_Cmd.none)
+  | StatusResult(Ok(_json)) => ({...model, videoCoordination: {...vc, loading: false}}, Tea_Cmd.none)
+  | StatusResult(Error(err)) => (
+      {...model, videoCoordination: {...vc, loading: false, error: Some(err)}},
+      Tea_Cmd.none,
+    )
+  | TransferResult(Ok(_json)) => (
+      {...model, videoCoordination: {...vc, loading: false}},
+      Tea_Cmd.none,
+    )
+  | TransferResult(Error(err)) => (
+      {...model, videoCoordination: {...vc, loading: false, error: Some(err)}},
+      Tea_Cmd.none,
+    )
+  | ClearError => ({...model, videoCoordination: {...vc, error: None}}, Tea_Cmd.none)
+  }
+}

tests/e2e_panel_lifecycle_test.js

@@ -102,8 +102,8 @@ Deno.test("E2E: Model.init() busRegistry exists", () => {
 // 2. Panel Registry — every panel can be looked up
 // ============================================================================
 
-Deno.test("E2E: PanelRegistry has all 107 registered panels", () => {
-  assertEquals(allPanels.length, 107);
+Deno.test("E2E: PanelRegistry has all 108 registered panels", () => {
+  assertEquals(allPanels.length, 108);
 });
 
 Deno.test("E2E: Every registered panel can be found by ID", () => {

tests/panel_registry_test.js

@@ -17,8 +17,8 @@ import {
   init,
 } from "../src/modules/PanelRegistry.res.js";
 
-Deno.test("allPanels has 107 entries", () => {
-  assertEquals(allPanels.length, 107);
+Deno.test("allPanels has 108 entries", () => {
+  assertEquals(allPanels.length, 108);
 });
 
 Deno.test("every panel has required fields", () => {