diff options
Diffstat (limited to 'sandbox/007-sandbox-delete.mu')
| -rw-r--r-- | sandbox/007-sandbox-delete.mu | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/sandbox/007-sandbox-delete.mu b/sandbox/007-sandbox-delete.mu index 252b6708..00738646 100644 --- a/sandbox/007-sandbox-delete.mu +++ b/sandbox/007-sandbox-delete.mu @@ -68,7 +68,7 @@ after <global-touch> [ delete?, env <- try-delete-sandbox click-row, env break-unless delete? hide-screen screen - screen <- render-sandbox-side screen, env + screen <- render-sandbox-side screen, env, render screen <- update-cursor screen, current-sandbox, env show-screen screen loop +next-event:label @@ -149,7 +149,7 @@ scenario deleting-sandbox-after-scroll [ # initialize environment 1:address:array:character <- new [] 2:address:programming-environment-data <- new-programming-environment screen:address:screen, 1:address:array:character - render-all screen, 2:address:programming-environment-data + render-all screen, 2:address:programming-environment-data, render # create 2 sandboxes and scroll to second assume-console [ press ctrl-n @@ -197,7 +197,7 @@ scenario deleting-top-sandbox-after-scroll [ # initialize environment 1:address:array:character <- new [] 2:address:programming-environment-data <- new-programming-environment screen:address:screen, 1:address:array:character - render-all screen, 2:address:programming-environment-data + render-all screen, 2:address:programming-environment-data, render # create 2 sandboxes and scroll to second assume-console [ press ctrl-n @@ -245,7 +245,7 @@ scenario deleting-final-sandbox-after-scroll [ # initialize environment 1:address:array:character <- new [] 2:address:programming-environment-data <- new-programming-environment screen:address:screen, 1:address:array:character - render-all screen, 2:address:programming-environment-data + render-all screen, 2:address:programming-environment-data, render # create 2 sandboxes and scroll to second assume-console [ press ctrl-n @@ -292,7 +292,7 @@ scenario deleting-updates-sandbox-count [ # initialize environment 1:address:array:character <- new [] 2:address:programming-environment-data <- new-programming-environment screen:address:screen, 1:address:array:character - render-all screen, 2:address:programming-environment-data + render-all screen, 2:address:programming-environment-data, render # create 2 sandboxes assume-console [ press ctrl-n |