.

2 files changed, 14 insertions, 17 deletions

diff --git a/shell/sandbox.mu b/shell/sandbox.mu
index a64441c1..286ce6e8 100644
--- a/shell/sandbox.mu
+++ b/shell/sandbox.mu
@@ -412,8 +412,7 @@ fn render-sandbox-menu screen: (addr screen), _self: (addr sandbox) {
   height <- increment
   clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg
   set-cursor-position screen, 0/x, y
-  draw-text-rightward-from-cursor screen, " ctrl+... ", width, 0xf/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " r ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^r ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " run main  ", width, 7/fg, 0xc5/bg=blue-bg
   $render-sandbox-menu:render-ctrl-m: {
     var self/eax: (addr sandbox) <- copy _self
@@ -421,22 +420,22 @@ fn render-sandbox-menu screen: (addr screen), _self: (addr sandbox) {
     compare has-trace?, 0/false
     {
       break-if-=
-      draw-text-rightward-from-cursor screen, " m ", width, 0/fg, 0x38/bg=trace
+      draw-text-rightward-from-cursor screen, " ^m ", width, 0/fg, 0x38/bg=trace
       draw-text-rightward-from-cursor screen, " to trace  ", width, 7/fg, 0xc5/bg=blue-bg
       break $render-sandbox-menu:render-ctrl-m
     }
-    draw-text-rightward-from-cursor screen, " m ", width, 0/fg, 3/bg=keyboard
+    draw-text-rightward-from-cursor screen, " ^m ", width, 0/fg, 3/bg=keyboard
     draw-text-rightward-from-cursor screen, " to keyboard  ", width, 7/fg, 0xc5/bg=blue-bg
   }
-  draw-text-rightward-from-cursor screen, " s ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^s ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " run sandbox  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " a ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^a ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " <<  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " b ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^b ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " <word  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " f ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^f ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " word>  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " e ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^e ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " >>  ", width, 7/fg, 0xc5/bg=blue-bg
 }
 
@@ -450,12 +449,11 @@ fn render-keyboard-menu screen: (addr screen) {
   height <- increment
   clear-rect screen, 0/x, y, width, height, 0xc5/bg=blue-bg
   set-cursor-position screen, 0/x, y
-  draw-text-rightward-from-cursor screen, " ctrl+... ", width, 0xf/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " r ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^r ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " run main  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " s ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^s ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " run sandbox  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " m ", width, 0/fg, 7/bg
+  draw-text-rightward-from-cursor screen, " ^m ", width, 0/fg, 7/bg
   draw-text-rightward-from-cursor screen, " to sandbox  ", width, 7/fg, 0xc5/bg=blue-bg
 }
 
diff --git a/shell/trace.mu b/shell/trace.mu
index 3b58b5f7..63ee3a53 100644
--- a/shell/trace.mu
+++ b/shell/trace.mu
@@ -894,12 +894,11 @@ fn render-trace-menu screen: (addr screen) {
   set-cursor-position screen, 0/x, y
   draw-text-rightward-from-cursor screen, " enter/bksp ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " expand/collapse  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " ctrl+... ", width, 0xf/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " r ", width, 0/fg, 0x5c/bg=black
+  draw-text-rightward-from-cursor screen, " ^r ", width, 0/fg, 0x5c/bg=black
   draw-text-rightward-from-cursor screen, " run main  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " m ", width, 0/fg, 3/bg=keyboard
+  draw-text-rightward-from-cursor screen, " ^m ", width, 0/fg, 3/bg=keyboard
   draw-text-rightward-from-cursor screen, " to keyboard  ", width, 7/fg, 0xc5/bg=blue-bg
-  draw-text-rightward-from-cursor screen, " s ", width, 0/fg, 3/bg=keyboard
+  draw-text-rightward-from-cursor screen, " ^s ", width, 0/fg, 3/bg=keyboard
   draw-text-rightward-from-cursor screen, " show whole line  ", width, 7/fg, 0xc5/bg=blue-bg
 }