blob: 8ac06d552e3a26045ad4ff29c6246e878877157a (
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
|
# 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.
press middle 56 30
release middle 56 30
stable 700 15000
snap del-image
|
