From 7bf9212fd47e505711cc0873d30456e3d793034d Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Sat, 23 Apr 2016 17:02:16 -0700
Subject: 2861 - 'maybe-convert' no longer returns address

---
 sandbox/005-sandbox.mu | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'sandbox/005-sandbox.mu')

diff --git a/sandbox/005-sandbox.mu b/sandbox/005-sandbox.mu
index 0b6bd79c..7297c768 100644
--- a/sandbox/005-sandbox.mu
+++ b/sandbox/005-sandbox.mu
@@ -109,7 +109,7 @@ scenario run-and-show-results [
 after <global-keypress> [
   # F4? load all code and run all sandboxes.
   {
-    do-run?:boolean <- equal *k, 65532/F4
+    do-run?:boolean <- equal k, 65532/F4
     break-unless do-run?
     screen <- update-status screen, [running...       ], 245/grey
     test-recipes:address:shared:array:character, _/optional <- next-ingredient
@@ -606,7 +606,7 @@ scenario scrolling-down-past-bottom-of-sandbox-editor [
 # down on sandbox side updates render-from when sandbox editor has cursor at bottom
 after <global-keypress> [
   {
-    down?:boolean <- equal *k, 65516/down-arrow
+    down?:boolean <- equal k, 65516/down-arrow
     break-unless down?
     sandbox-bottom:number <- get *current-sandbox, bottom:offset
     sandbox-cursor:number <- get *current-sandbox, cursor-row:offset
@@ -646,7 +646,7 @@ after <update-cursor-special-cases> [
 # 'up' on sandbox side is like 'down': updates first-sandbox-to-render when necessary
 after <global-keypress> [
   {
-    up?:boolean <- equal *k, 65517/up-arrow
+    up?:boolean <- equal k, 65517/up-arrow
     break-unless up?
     render-from:number <- get *env, render-from:offset
     at-beginning?:boolean <- equal render-from, -1
-- 
cgit 1.4.1-2-gfad0