diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-05-19 09:10:29 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-05-19 09:10:29 -0700 |
commit | 1521e4e32f7a5ddd3629006b3e46501ed22d91a5 (patch) | |
tree | cc6de148bdf3d3b78caa48ef51ce31ce0b6cad3b /edit/004-programming-environment.mu | |
parent | 2655ae726e607ba4caa88c088ffb77e50753aead (diff) | |
download | mu-1521e4e32f7a5ddd3629006b3e46501ed22d91a5.tar.gz |
2975
Clean up this helper before we start redoing sandbox menubars.
Diffstat (limited to 'edit/004-programming-environment.mu')
-rw-r--r-- | edit/004-programming-environment.mu | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/edit/004-programming-environment.mu b/edit/004-programming-environment.mu index e7509bf7..a432d565 100644 --- a/edit/004-programming-environment.mu +++ b/edit/004-programming-environment.mu @@ -411,7 +411,7 @@ def render-recipes screen:address:screen, env:address:programming-environment-da left:number <- get *recipes, left:offset right:number <- get *recipes, right:offset row:number, column:number, screen <- render screen, recipes - clear-line-delimited screen, column, right + clear-line-until screen, right row <- add row, 1 <render-recipe-components-end> # draw dotted line after recipes @@ -428,7 +428,7 @@ def render-sandbox-side screen:address:screen, env:address:programming-environme left:number <- get *current-sandbox, left:offset right:number <- get *current-sandbox, right:offset row:number, column:number, screen, current-sandbox <- render screen, current-sandbox - clear-line-delimited screen, column, right + clear-line-until screen, right row <- add row, 1 # draw solid line after code (you'll see why in later layers) draw-horizontal screen, row, left, right, 9473/horizontal @@ -507,7 +507,7 @@ def render screen:address:screen, s:address:array:character, left:number, right: loop } was-at-left?:boolean <- equal column, left - clear-line-delimited screen, column, right + clear-line-until screen, right { break-if was-at-left? row <- add row, 1 @@ -570,7 +570,7 @@ def render-code screen:address:screen, s:address:array:character, left:number, r loop } was-at-left?:boolean <- equal column, left - clear-line-delimited screen, column, right + clear-line-until screen, right { break-if was-at-left? row <- add row, 1 |