From 53251357c969c3ae7bb3a17b5e55114e69f0e85d Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sat, 20 May 2017 01:27:02 -0700 Subject: 3870 - seldom draw both sides of edit/ --- html/edit/008-sandbox-edit.mu.html | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'html/edit/008-sandbox-edit.mu.html') diff --git a/html/edit/008-sandbox-edit.mu.html b/html/edit/008-sandbox-edit.mu.html index bdca5bcc..64abe297 100644 --- a/html/edit/008-sandbox-edit.mu.html +++ b/html/edit/008-sandbox-edit.mu.html @@ -166,7 +166,7 @@ if ('onhashchange' in window) { 104 ] 105 ] 106 -107 after <global-touch> [ +107 after <global-touch> [ 108 # support 'edit' button 109 { 110 ¦ edit?:bool <- should-attempt-edit? click-row, click-column, env @@ -174,7 +174,7 @@ if ('onhashchange' in window) { 112 ¦ edit?, env <- try-edit-sandbox click-row, env 113 ¦ break-unless edit? 114 ¦ screen <- render-sandbox-side screen, env, render -115 ¦ screen <- update-cursor screen, recipes, current-sandbox, sandbox-in-focus?, env +115 ¦ screen <- update-cursor screen, recipes, current-sandbox, sandbox-in-focus?, env 116 ¦ loop +next-event 117 } 118 ] @@ -270,7 +270,7 @@ if ('onhashchange' in window) { 208 assume-resources [ 209 ] 210 env:&:environment <- new-programming-environment resources, screen, [] -211 render-all screen, env, render +211 render-all screen, env, render 212 # create 2 sandboxes and scroll to second 213 assume-console [ 214 ¦ press ctrl-n @@ -319,7 +319,7 @@ if ('onhashchange' in window) { 257 assume-resources [ 258 ] 259 env:&:environment <- new-programming-environment resources, screen, [] -260 render-all screen, env, render +260 render-all screen, env, render 261 # create 2 sandboxes 262 assume-console [ 263 ¦ press ctrl-n -- cgit 1.4.1-2-gfad0