diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-05-19 21:35:34 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-05-19 21:35:34 -0700 |
commit | 607ddf3391dba72725a368e047169004ada0fcbe (patch) | |
tree | baa3557cae6220a7e9be943af0d76edd7e0eb588 /edit/001-editor.mu | |
parent | 66ee78a7bbc209d640c3c360d8973248bc66c898 (diff) | |
download | mu-607ddf3391dba72725a368e047169004ada0fcbe.tar.gz |
2983 - migrate buttons over to sandbox/
Diffstat (limited to 'edit/001-editor.mu')
-rw-r--r-- | edit/001-editor.mu | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/edit/001-editor.mu b/edit/001-editor.mu index 68bb1775..be210b95 100644 --- a/edit/001-editor.mu +++ b/edit/001-editor.mu @@ -222,26 +222,6 @@ def render screen:address:screen, editor:address:editor-data -> last-row:number, return row, column, screen/same-as-ingredient:0, editor/same-as-ingredient:1 ] -def clear-line-until screen:address:screen, right:number/inclusive -> screen:address:screen [ - local-scope - load-ingredients - _, column:number <- cursor-position screen - space:character <- copy 32/space - bg-color:number, bg-color-found?:boolean <- next-ingredient - { - # default bg-color to black - break-if bg-color-found? - bg-color <- copy 0/black - } - { - done?:boolean <- greater-than column, right - break-if done? - screen <- print screen, space, 7/white, bg-color # foreground color is mostly unused except if the cursor shows up at this cell - column <- add column, 1 - loop - } -] - def clear-screen-from screen:address:screen, row:number, column:number, left:number, right:number -> screen:address:screen [ local-scope load-ingredients |