From 9680bcbada10e114b580bb2807968b43b1f4a0f5 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 30 Jun 2015 17:28:18 -0700 Subject: 1687 --- edit.mu | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/edit.mu b/edit.mu index bcb0ccf6..5264520a 100644 --- a/edit.mu +++ b/edit.mu @@ -1510,16 +1510,17 @@ scenario editors-chain-to-cover-multiple-columns [ scenario multiple-editors-cover-only-their-own-areas [ assume-screen 10:literal/width, 5:literal/height - draw-vertical screen:address, 5:literal/divider, 0:literal/top, 5:literal/height run [ - # initialize an editor covering left half of screen + # draw a divider + draw-vertical screen:address, 5:literal/divider, 0:literal/top, 5:literal/height + # initialize editors on both sides of it and chain the two 1:address:array:character <- new [abc] 2:address:editor-data <- new-editor 1:address:array:character, screen:address, 0:literal/top, 0:literal/left, 5:literal/right 3:address:array:character <- new [def] - # chain new editor to it, covering the right half of the screen 4:address:address:editor-data <- get-address 2:address:editor-data/deref, next-editor:offset 4:address:address:editor-data/deref <- new-editor 3:address:array:character, screen:address, 0:literal/top, 6:literal/left, 10:literal/right ] + # divider isn't messed up screen-should-contain [ .abc │def . . │ . -- cgit 1.4.1-2-gfad0