3984 - bugfix: display errors when scrolling recipe side

This regression was (also) introduced by commit 3902 in June.

1 files changed, 38 insertions, 0 deletions

diff --git a/edit/011-errors.mu b/edit/011-errors.mu
index 8db2c583..554130b5 100644
--- a/edit/011-errors.mu
+++ b/edit/011-errors.mu
@@ -35,6 +35,10 @@ before <end-run-sandboxes-on-F4> [
   screen <- render-recipe-errors env, screen
 ]
 
+before <end-render-recipe-components> [
+  screen <- render-recipe-errors env, screen
+]
+
 def render-recipe-errors env:&:environment, screen:&:screen -> screen:&:screen [
   local-scope
   load-ingredients
@@ -621,6 +625,40 @@ scenario run-hides-errors [
   ]
 ]
 
+scenario scrolling-recipe-side-reveals-errors [
+  local-scope
+  trace-until 100/app  # trace too long
+  assume-screen 100/width, 5/height
+  # recipe overflows recipe side
+  assume-resources [
+    [lesson/recipes.mu] <- [
+      |recipe foo [|
+      |  a:num <- copy 0|  # padding to overflow recipe side
+      |  b:num <- copy 0|  # padding to overflow recipe side
+      |  get 123:num, foo:offset|  # line containing error
+      |]|
+    ]
+  ]
+  env:&:environment <- new-programming-environment resources, screen, [foo]
+  render-all screen, env, render
+  # hit F4, generating errors, then scroll down
+  assume-console [
+    press F4
+    press page-down
+  ]
+  run [
+    event-loop screen, console, env, resources
+  ]
+  # errors should be displayed
+  screen-should-contain [
+    .  errors found                                                                   run (F4)           .
+    .  get 123:num, foo:offset                         ┊foo                                              .
+    .\\]                                                 ┊─────────────────────────────────────────────────.
+    .foo: unknown element 'foo' in container 'number'  ┊                                                 .
+    .┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┈┊                                                 .
+  ]
+]
+
 scenario run-instruction-and-print-errors [
   local-scope
   trace-until 100/app  # trace too long