From 8a92572df505eab170912e082e085301e7fecddd Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 22 Aug 2017 09:50:06 -0700 Subject: 3983 --- html/edit/009-sandbox-test.mu.html | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'html/edit/009-sandbox-test.mu.html') diff --git a/html/edit/009-sandbox-test.mu.html b/html/edit/009-sandbox-test.mu.html index 5b817172..c6ef7017 100644 --- a/html/edit/009-sandbox-test.mu.html +++ b/html/edit/009-sandbox-test.mu.html @@ -159,7 +159,7 @@ if ('onhashchange' in window) { 96 ] 97 98 # include expected response when saving or restoring a sandbox - 99 before <end-save-sandbox> [ + 99 before <end-save-sandbox> [ 100 { 101 ¦ expected-response:text <- get *sandbox, expected-response:offset 102 ¦ break-unless expected-response @@ -168,7 +168,7 @@ if ('onhashchange' in window) { 105 } 106 ] 107 -108 before <end-restore-sandbox> [ +108 before <end-restore-sandbox> [ 109 { 110 ¦ filename <- append filename, [.out] 111 ¦ contents <- slurp resources, filename @@ -197,7 +197,7 @@ if ('onhashchange' in window) { 134 ¦ # update it 135 ¦ sandbox <- toggle-expected-response sandbox 136 ¦ # minimal update to disk -137 ¦ save-sandbox resources, sandbox, sandbox-index +137 ¦ save-sandbox resources, sandbox, sandbox-index 138 ¦ # minimal update to screen 139 ¦ sandbox-right-margin:num <- get *current-sandbox, right:offset 140 ¦ row:num <- render-sandbox-response screen, sandbox, sandbox-left-margin, sandbox-right-margin @@ -258,7 +258,7 @@ if ('onhashchange' in window) { 195 ] 196 197 # when rendering a sandbox, color it in red/green if expected response exists -198 after <render-sandbox-response> [ +198 after <render-sandbox-response> [ 199 { 200 ¦ break-unless sandbox-response 201 ¦ *sandbox <- put *sandbox, response-starting-row-on-screen:offset, row @@ -275,21 +275,21 @@ if ('onhashchange' in window) { 212 row:num <- get *sandbox response-starting-row-on-screen:offset 213 { 214 ¦ break-if expected-response -215 ¦ row <- render-text screen, sandbox-response, left, right, 245/grey, row +215 ¦ row <- render-text screen, sandbox-response, left, right, 245/grey, row 216 ¦ return 217 } 218 response-is-expected?:bool <- equal expected-response, sandbox-response 219 { 220 ¦ break-if response-is-expected? -221 ¦ row <- render-text screen, sandbox-response, left, right, 1/red, row +221 ¦ row <- render-text screen, sandbox-response, left, right, 1/red, row 222 } 223 { 224 ¦ break-unless response-is-expected?:bool -225 ¦ row <- render-text screen, sandbox-response, left, right, 2/green, row +225 ¦ row <- render-text screen, sandbox-response, left, right, 2/green, row 226 } 227 ] 228 -229 before <end-render-sandbox-reset-hidden> [ +229 before <end-render-sandbox-reset-hidden> [ 230 *sandbox <- put *sandbox, response-starting-row-on-screen:offset, 0 231 ] -- cgit 1.4.1-2-gfad0