diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2017-06-23 23:20:37 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2017-06-23 23:20:37 -0700 |
| commit | 3d4fb62a1256b3511630a8408930343187402666 (patch) | |
| tree | e5aa35c53042d8368a2b2f4aee816323edf1a960 /sandbox | |
| parent | 5cac8865dd280fda821a3eb98ed38522500395be (diff) | |
| download | mu-3d4fb62a1256b3511630a8408930343187402666.tar.gz | |
3946
Fix the failing scenario of commit 3944.
Diffstat (limited to 'sandbox')
| -rw-r--r-- | sandbox/005-sandbox.mu | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sandbox/005-sandbox.mu b/sandbox/005-sandbox.mu index 2b671a07..0d14a42e 100644 --- a/sandbox/005-sandbox.mu +++ b/sandbox/005-sandbox.mu @@ -251,7 +251,7 @@ def! render-sandbox-side screen:&:screen, env:&:environment, render-editor:rende row, screen <- render-sandboxes screen, sandbox, left, right, row, render-from, 0, env clear-rest-of-screen screen, row, left, right # -#? assert-no-scroll screen, old-top-idx + assert-no-scroll screen, old-top-idx ] def render-sandboxes screen:&:screen, sandbox:&:sandbox, left:num, right:num, row:num, render-from:num, idx:num -> row:num, screen:&:screen, sandbox:&:sandbox [ @@ -260,13 +260,13 @@ def render-sandboxes screen:&:screen, sandbox:&:sandbox, left:num, right:num, ro env:&:environment, _/optional <- next-ingredient return-unless sandbox screen-height:num <- screen-height screen - at-bottom?:bool <- greater-or-equal row, screen-height - return-if at-bottom? hidden?:bool <- lesser-than idx, render-from { break-if hidden? # render sandbox menu row <- add row, 1 + at-bottom?:bool <- greater-or-equal row, screen-height + return-if at-bottom? screen <- move-cursor screen, row, left screen <- render-sandbox-menu screen, idx, left, right # save menu row so we can detect clicks to it later |