about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-08-15 05:07:31 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-08-15 05:07:31 -0700
commit373953f21d267710cfc1e9c41d34f249a39cc84a (patch)
treeadb8677e88ba1267059756d4afeca8b5fcfb01fb
parent35379c9abc22cb2ed535b0808efac909bddbb707 (diff)
downloadmu-373953f21d267710cfc1e9c41d34f249a39cc84a.tar.gz
2006
-rw-r--r--edit.mu46
1 files changed, 23 insertions, 23 deletions
diff --git a/edit.mu b/edit.mu
index 8886b835..656090c0 100644
--- a/edit.mu
+++ b/edit.mu
@@ -3963,29 +3963,6 @@ recipe resize [
   reply env/same-as-ingredient:1
 ]
 
-recipe update-cursor [
-  local-scope
-  screen:address <- next-ingredient
-  recipes:address:editor-data <- next-ingredient
-  current-sandbox:address:editor-data <- next-ingredient
-  sandbox-in-focus?:boolean <- next-ingredient
-  {
-    break-if sandbox-in-focus?
-#?     $print [recipes in focus
-#? ] #? 1
-    cursor-row:number <- get *recipes, cursor-row:offset
-    cursor-column:number <- get *recipes, cursor-column:offset
-  }
-  {
-    break-unless sandbox-in-focus?
-#?     $print [sandboxes in focus
-#? ] #? 1
-    cursor-row:number <- get *current-sandbox, cursor-row:offset
-    cursor-column:number <- get *current-sandbox, cursor-column:offset
-  }
-  move-cursor screen, cursor-row, cursor-column
-]
-
 scenario point-at-multiple-editors [
   $close-trace
   assume-screen 30/width, 5/height
@@ -4217,6 +4194,29 @@ recipe render-recipes [
   reply screen/same-as-ingredient:0
 ]
 
+recipe update-cursor [
+  local-scope
+  screen:address <- next-ingredient
+  recipes:address:editor-data <- next-ingredient
+  current-sandbox:address:editor-data <- next-ingredient
+  sandbox-in-focus?:boolean <- next-ingredient
+  {
+    break-if sandbox-in-focus?
+#?     $print [recipes in focus
+#? ] #? 1
+    cursor-row:number <- get *recipes, cursor-row:offset
+    cursor-column:number <- get *recipes, cursor-column:offset
+  }
+  {
+    break-unless sandbox-in-focus?
+#?     $print [sandboxes in focus
+#? ] #? 1
+    cursor-row:number <- get *current-sandbox, cursor-row:offset
+    cursor-column:number <- get *current-sandbox, cursor-column:offset
+  }
+  move-cursor screen, cursor-row, cursor-column
+]
+
 # ctrl-n - switch focus
 # todo: test this