From 717d6cddc1464df9744a37056016b9f4230ab650 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 11 Jan 2017 09:40:41 -0800 Subject: 3732 --- 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 70f0141f..a7482e8a 100644 --- a/html/edit/008-sandbox-edit.mu.html +++ b/html/edit/008-sandbox-edit.mu.html @@ -172,7 +172,7 @@ if ('onhashchange' in window) { 112 edit?, env <- try-edit-sandbox click-row, env 113 break-unless edit? 114 hide-screen screen -115 screen <- render-sandbox-side screen, env, render +115 screen <- render-sandbox-side screen, env, render 116 screen <- update-cursor screen, recipes, current-sandbox, sandbox-in-focus?, env 117 show-screen screen 118 loop +next-event @@ -209,7 +209,7 @@ if ('onhashchange' in window) { 149 # 'edit' button = 'copy' button + 'delete' button 150 text:text <- get *sandbox, data:offset 151 current-sandbox:&:editor <- get *env, current-sandbox:offset -152 current-sandbox <- insert-text current-sandbox, text +152 current-sandbox <- insert-text current-sandbox, text 153 env <- delete-sandbox env, sandbox 154 # reset scroll 155 *env <- put *env, render-from:offset, -1 @@ -270,7 +270,7 @@ if ('onhashchange' in window) { 210 assume-resources [ 211 ] 212 env:&:environment <- new-programming-environment resources, screen, [] -213 render-all screen, env, render +213 render-all screen, env, render 214 # create 2 sandboxes and scroll to second 215 assume-console [ 216 press ctrl-n @@ -319,7 +319,7 @@ if ('onhashchange' in window) { 259 assume-resources [ 260 ] 261 env:&:environment <- new-programming-environment resources, screen, [] -262 render-all screen, env, render +262 render-all screen, env, render 263 # create 2 sandboxes 264 assume-console [ 265 press ctrl-n -- cgit 1.4.1-2-gfad0