2591

1 files changed, 7 insertions, 1 deletions

diff --git a/sandbox/001-editor.mu b/sandbox/001-editor.mu
index c773a0ad..c83b7f3a 100644
--- a/sandbox/001-editor.mu
+++ b/sandbox/001-editor.mu
@@ -233,10 +233,16 @@ recipe clear-line-delimited screen:address:shared:screen, column:number, right:n
   local-scope
   load-ingredients
   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
+    screen <- print screen, space, 0/color/unused, bg-color
     column <- add column, 1
     loop
   }