R5.7: Gitea #1, ElyShow's slide strip scrolls with the wheel; R1 PASS

The strip's list sat in a ContextMenu host with no size, so it grew
with its content and never overflowed. The host now fills its column,
as ElyPDF's do; a 24-slide test wheels to the last slide.

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

agents.md

@@ -290,3 +290,4 @@ cargo run -p ely-doc          启动一个应用（ElyDoc 先 cargo build -p ely
 - 2026-10-14（用户要求照 Word）：ElyDoc 的右键与表格（R5）。右键菜单由 Ely 按目标自建（`apps/ely-doc/src/menu.rs`），开在所点之处（`LokView` 记下右键点，`take_menu` 一并交出）：目标、各项可否与拼写建议都取自内核这次给的菜单（`ely_lok::menu`：有 `WrapMenu` 为图片，有 `TableInsertMenu` 为表格，否则正文；缺 `enabled` 即报错），命令只经 `COMMANDS`。剪切、复制、粘贴为图标行（组件库 `Menu::buttons`）；正文为链接…、新建批注；表格另有插入、删除、合并、拆分、平均分布；图片为文字环绕（嵌入、四周、上下、浮于文字上方；内核无紧密、穿越、衬于文字下方的对应项，不列）、置于顶层、置于底层、插入题注…，新建批注灰显（内核的图片菜单无批注）。链接…随内核的 `.uno:InsertHyperlink`：须选中可编辑的文字，未选中时灰显（Word 未选中也可用；照做须改内核，未做）。拖动表格边线：worker 把 `LOK_CALLBACK_TABLE_SELECTED` 读成 `ely_lok::table::Table`（列与行边线、上下限），视图在边线上显示调整指针（命中范围不超过与邻线距离的四分之一，矮行的中间仍落在文档），按住时记下读到它的批次的修订与按住处的偏移，拖动时画参考线（出视图照跟），松开以 `.uno:TableChangeCurrentBorderPosition` 发一条命令（一步撤销），原地松开不发；其间文档变了即以过期拒绝（`view/borders.rs`）。内核在 LOK 下不处理边线的指针与拖动（依赖 LOK 没有的标尺）。属性栏在光标进表格时把表格组排在最前（组件库 9ff403d 起按标题记折叠）。Windows 真窗口逐项核对过（右键三种目标、插入行列、拖动列宽行高、撤销、保存后重开）；拼写建议在 Windows 上内核不给（P3-01），未核对。
 - 2026-10-14（用户要求核对 ElyTable 与 ElyShow）：ElyTable 的右键（R5.5）。菜单机制移入 `ely_office::menu`（取内核这次给的菜单、开在所点之处、剪贴板图标行、子菜单可否随其中各项），ElyDoc 与 ElyTable 共用；`ely_lok::menu` 的目标另有单元格（有 `.uno:InsertCell`）与 Writer 之外的绘图对象（有 `.uno:ArrangeMenu`）。网格照 Excel：插入 ▸、删除 ▸、清除内容（`.uno:ClearContents`，同 Delete 键，不弹内核的删除内容对话框）、合并、拆分、设置单元格格式（打开格式面板）；对象为置于顶层、置于底层；编辑单元格时只有剪贴板行。行列表头由 Ely 自画，内核不给菜单：右键先选中该行或列（已选的整行整列含它即不动，同 Excel）。选中对象或正编辑图形里的文字时，绘图外壳取代了单元格外壳，`.uno:SelectRow`/`.uno:SelectColumn` 原无处执行而被丢弃；补丁 `0046-lok-calc-headers-leave-drawings.patch` 让 LOK 下视图外壳接下这两条：先结束图形编辑（键入的文字留下）并取消选中，再选行列，同 Calc 自己的表头（`DrawDeselectAll`），菜单为插入、删除、清除内容、行高或列宽、隐藏、显示。ElyTable 每一项的可否都取自内核对它所发的那条命令此刻的状态（内核的菜单只定目标）：补丁 `0045-lok-command-states.patch` 加 `getCommandValues(".uno:CommandStates?commands=…")`，先冲出调度器、再逐条问调度器（同菜单栏），未知的命令即报错（`ely_lok::menu::runs`）；LOK 推送的状态只有固定的一组，且在空闲时才更新。因此受保护而许插入行列的工作表照样可插；行高、列宽只在文档只读时禁用（内核的规则），受保护时由内核拒绝并报出其错误。ElyTable 无批注界面，不列批注。
 - 2026-10-14：ElyShow 的右键（R5.6）。画布右键照 PowerPoint 按目标出 Ely 的菜单（`apps/ely-show/src/menu.rs`，共用 `ely_office::menu`）；`ely_lok::menu` 的目标另有幻灯片（有 `.uno:SlideLayoutMenu`）与 Writer 之外的图片（有 `.uno:ChangePicture`）。幻灯片为版式 ▸、新建批注；编辑文字为项目符号、编号、新建批注；图形与文本框为组合 ▸、置于顶层 ▸、置于底层 ▸、新建批注；图片另有替换…、裁剪；表格为插入 ▸、删除 ▸、合并单元格、新建批注；剪贴板同为图标行。每项可否取自内核对其命令此刻的状态（补丁 0045）：整表选中时可插入行列，删除与合并要光标进单元格（内核的规则）。Impress 的 `LOK_CALLBACK_TABLE_SELECTED` 由 boost 属性树写出，数值与真假都是文字，空列表是空串，`table::read` 照收；拖动表格边线走 R5.3 的同一路径（`.uno:TableChangeCurrentBorderPosition`，偏移为 twips，内核换算）。补丁 `0047-lok-impress-table-edges.patch`：Impress 原只给内侧边线的上下限，行的下限是布局器写死的 600（上游待办），参考线与落点不符；补丁让两轴都带首尾边线的上下限（`leftMin`、`leftMax`、`rightMin`、`rightMax`，列只限从左到右），内侧行线取行自身的最小高度，`table::Lines::ends` 收下，有则按它夹住（内侧线也直接用内核的上限），Writer 不给时照旧留 40 twips；已在界外的线从不逆着拖动方向移动，原地按下松开不发命令；最左列边线原什么也不做却记一步撤销（上游待办），LOK 下改为改首列宽并随边线移动表格，同一步撤销，桌面的拖动手柄不变。正编辑的单元格按编辑器量最小高度，略大于内核真正允许的（约 2 像素），新表的行因此不能再缩，参考线与落点仍一致。正编辑表格单元格时在幻灯片空白处右键，内核只结束编辑、不给菜单，再按一次才有（BUGS P3-11）。
+- 2026-10-14（Gitea #1，Linux Wayland 报）：ElyShow 左侧缩略图条滚轮不滚。根因：列表包在 `ContextMenu` 宿主里，宿主无尺寸，列表随内容长高、从不溢出，滚轮无处可滚（右栏正常）；宿主改为 `size_full`（同 ElyPDF 的三处），`tests/strip.rs` 以 24 张幻灯片核对滚轮滚到最后一张。各应用其余 `ContextMenu` 宿主已核：ElyPDF 三处本有尺寸，ElyTable 的工作表标签条与下拉选项不是滚动列表。

apps/ely-show/src/slides.rs

@@ -234,6 +234,7 @@ impl Render for Strip {
                 let label = format!("{} {}", part + 1, slide.name);
                 div()
                     .id(("show-slide", part))
+                    .debug_selector(move || format!("show-slide-{part}"))
                     .tab_index(0)
                     .focus_ring(cx)
                     .flex()
@@ -301,6 +302,7 @@ impl Render for Strip {
             .children(slides);
         div()
             .size_full()
-            .child(ContextMenu::new("show-strip-menu", popup(cx)).child(list))
+            // A sized host lets the list overflow and scroll.
+            .child(ContextMenu::new("show-strip-menu", popup(cx)).size_full().child(list))
     }
 }

apps/ely-show/src/tests.rs

@@ -18,6 +18,7 @@ mod play_more;
 mod play_time;
 mod review;
 mod slides;
+mod strip;
 
 /// An unrendered Deck over a fresh worker, if LOK exists.
 pub(super) fn deck(cx: &mut TestAppContext, dir: &Path) -> Option<Entity<Deck>> {

apps/ely-show/src/tests/strip.rs

@@ -0,0 +1,47 @@
+use gpui::{Entity, ScrollDelta, ScrollWheelEvent, TestAppContext, VisualTestContext, point, px};
+
+use super::objects::blank;
+use super::{counts, settle, update};
+use crate::slides::Strip;
+
+/// The slide strip alone in a window.
+struct Host(Entity<Strip>);
+
+impl gpui::Render for Host {
+    fn render(&mut self, _: &mut gpui::Window, _: &mut gpui::Context<Self>) -> impl gpui::IntoElement {
+        use gpui::{ParentElement as _, Styled as _};
+        gpui::div().size_full().child(self.0.clone())
+    }
+}
+
+#[test]
+fn the_wheel_scrolls_the_strip_to_its_last_slide() {
+    let dir = tempfile::tempdir().expect("a temp dir");
+    let mut cx = TestAppContext::single();
+    let Some(deck) = blank(&mut cx, dir.path()) else {
+        return eprintln!("SKIP: no LOK build");
+    };
+    for n in 2..=24 {
+        update(&mut cx, &deck, |deck, cx| deck.object_command("slide.insert", &[], cx));
+        settle(&cx, |app| counts(app, &deck).0 == n);
+    }
+    let strip = cx.update(|app| deck.read(app).strip.clone());
+    let window = cx.add_window(|_, _| Host(strip));
+    let mut shown = VisualTestContext::from_window(window.into(), &cx);
+    shown.run_until_parked();
+    let height = shown.update(|window, _| window.viewport_size().height);
+    let last = |shown: &mut VisualTestContext| shown.debug_bounds("show-slide-23").expect("the last slide is laid out");
+    let before = last(&mut shown);
+    assert!(before.bottom() > height, "the strip is longer than the window");
+    let at = point(before.left() + px(20.0), height / 2.0);
+    for _ in 0..20 {
+        shown.simulate_event(ScrollWheelEvent {
+            position: at,
+            delta: ScrollDelta::Pixels(point(px(0.0), px(-1000.0))),
+            ..Default::default()
+        });
+        shown.run_until_parked();
+    }
+    let after = last(&mut shown);
+    assert!(after.bottom() <= height, "the last slide is in view: {after:?}");
+}

tasks/TASKS.md

@@ -252,5 +252,5 @@
 - [x] R5.4 验收：Windows 真窗口逐项核对（右键四种目标、加行加列、拖动列宽与行高、撤销、保存后重开）；`agents.md` 随之；逐条核对表 — R2 PASS（拼写建议在 Windows 上内核不给，未核对，P3-01）
 - [x] R5.5 ElyTable 右键（用户 2026-10-14 要求核对同类问题）：网格右键原无菜单（内核给了，Ely 丢弃），行列表头只收左键；照 Excel 按目标出 Ely 的菜单：单元格（剪切、复制、粘贴，插入、删除、清除内容，合并拆分，设置单元格格式；ElyTable 无批注界面，不列），行与列表头（插入、删除、行高或列宽、隐藏、取消隐藏）；可否取自内核对各项命令的状态（补丁 0045）；表头在选中对象或编辑图形文字时照样选行列（补丁 0046）；ElyDoc 的菜单机制移入 `ely-office` 共用 — 三轮用完，末轮修复已测（编辑图形文字时右键表头：补丁 0046 结束编辑、留下文字、退出绘图模式再选行列；行与列两种表头各有回归测试，存出的文件里两个图形的文字都在）
 - [x] R5.6 ElyShow 右键与表格：画布右键原无菜单；照 PowerPoint 按目标出菜单（幻灯片、文本框、图形、表格、图片）；表格菜单在光标进单元格后才有可否（内核对整表选中全报不可用）；拖动表格边线照 R5.3（Impress 的 `LOK_CALLBACK_TABLE_SELECTED` 以字符串写数值，`table::read` 须收下） — R3 PASS（补丁 0047：Impress 两轴首尾边线带上下限，内侧行线取行自身最小高度，最左列边线可拖并随之移动表格；正编辑表格单元格时在空白处右键无菜单为内核所限，BUGS P3-11）
-- [ ] R5.7 Gitea #1：ElyShow 左侧缩略图条滚轮不滚动（同窗口右栏正常，Linux Wayland 报）；查明根因再修，加滚轮回归测试
+- [x] R5.7 Gitea #1：ElyShow 左侧缩略图条滚轮不滚动（同窗口右栏正常，Linux Wayland 报）；查明根因再修，加滚轮回归测试 — R1 PASS（根因：列表包在无尺寸的 `ContextMenu` 宿主里，从不溢出；宿主改为 `size_full`，`tests/strip.rs` 以 24 张幻灯片核对）
 - [ ] R5.8 0.1.5 发布（用户 2026-10-14 定）：等 ElyMark 会话的 R4 做完；版本 0.1.5，Windows 与 WSL2 的 Linux 在本机建，macOS 在 Mac mini 上拉取后本机建；全部产物上传到 Gitea 的 v0.1.5 发布

tasks/reviews/R5.7-r1.md

@@ -0,0 +1 @@
+PASS