about summary refs log tree commit diff stats
path: root/edit/004-programming-environment.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-05-19 09:10:29 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-05-19 09:10:29 -0700
commit1521e4e32f7a5ddd3629006b3e46501ed22d91a5 (patch)
treecc6de148bdf3d3b78caa48ef51ce31ce0b6cad3b /edit/004-programming-environment.mu
parent2655ae726e607ba4caa88c088ffb77e50753aead (diff)
downloadmu-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.mu8
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