blob: f361186ddd00c02a167f3bf46b26d98e1c6750d7 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
# Tagbottom against the one pane kind whose renderPane RETURNS EARLY. An image
# draws no body rows and no tagline of its own — the tag comes from the outer
# loop and so does the transient message row — so it is exactly the pane where
# "the tag moved" and "the message row moved with it" can come apart. Nothing
# in tagbottom.snap touches one.
ppmdiag pic.ppm
start 30 150 -n 1
wait 8000 New Newcol
stable 700 20000
# open it the way images.snap does: type the name into the shell pane's own
# text and right-click it. The image lands in a column of its own on the left.
press left 5 8
release left 5 8
stable 400 5000
key i
text pic.ppm
key esc
settle 100
press right 6 8
release right 6 8
wait 10000 img
stable 700 20000
snap img-top
# SPC t b: the tag leaves row 1 for row 29 and the glyph art slides up into the
# row it left. The style capture is the half a text grid cannot see — the
# tagline's chrome colours have to travel with it, and a tag row drawn in the
# palette of the cell art under it would read as part of the picture.
key space t b
stable 700 15000
snap img-bottom
snapstyle img-bottom
# `/` on an image pane. There is no text to search, and that is the point: the
# prompt is drawn by the message-row pass, which runs OUTSIDE renderPane
# precisely so an early-returning pane still gets one. With Tagbottom it lands
# on the last row of the art (grid 28), just above the tagline on grid 29 —
# over the picture, never over the tag it was cut from.
key /
send ZZ
stable 600 8000
stable 400 5000
snap search-prompt
key esc
settle 100
stable 400 5000
# ...and EXECUTE `Del` on that bottom tagline, which is the assertion the
# pixels cannot make: the middle click has to map row 29 to the image pane's
# TAG row rather than to a body row it has no body for. The image pane goes
# away entirely and the shell takes the whole window back. Source-local
# columns plus the image-state prefix clip Del at 150 columns, so briefly widen
# the grid: the test still clicks the visible bottom-tag word, never the path.
resize 30 300
stable 400 5000
press middle 95 30
release middle 95 30
stable 400 5000
resize 30 150
stable 700 15000
snap del-image
|
