From 5d3769bece6edad2c4808342e5e3196903689618 Mon Sep 17 00:00:00 2001
From: crc <crc@noemail.net>
Date: Tue, 19 Feb 2019 02:48:24 +0000
Subject: [PATCH] block editor: fix some typos in the docs (thanks Kiyoshi)

FossilOrigin-Name: 11db2516295d61fd6024f467a1d8fc1550a7a26bed8225293562a50f9f15b848
---
 RELEASE_NOTES.md           |  1 +
 example/Block-Editor.forth | 10 +++++-----
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
index 816181f..c6e81db 100644
--- a/RELEASE_NOTES.md
+++ b/RELEASE_NOTES.md
@@ -103,6 +103,7 @@ June 2019.
 - add Abort.forth
 - add ANS-PICK-ROLL.forth
 - add atua-gophermap.forth
+- add Block-Editor.forth
 - add Buffer.forth
 - add CaptureOutput.forth
 - add DisplayNames.forth
diff --git a/example/Block-Editor.forth b/example/Block-Editor.forth
index f61dd01..82fa3da 100755
--- a/example/Block-Editor.forth
+++ b/example/Block-Editor.forth
@@ -57,10 +57,10 @@ Key Bindings
     |  q  | Save the Blocks and Quit       |
     |  `  | Clear output buffer            |
     |  7  | Share block                    |
-    |  m  | Copy line                      |
-    |  w  | Paste line                     |
-    |  M  | Copy block                     |
-    |  W  | Paste block                    |
+    |  b  | Copy line                      |
+    |  m  | Paste line                     |
+    |  B  | Copy block                     |
+    |  M  | Paste block                    |
     |  z  | Delete line                    |
 
 The key bindings are oriented around the Dvorak keyboard layout
@@ -203,7 +203,7 @@ It should be pretty straightforward though.
   :scroll? (-f)
     @TNext #256 gt? ;
   :scroll-up (-)
-    &TOB #64 + &TOB #192 copy #193 !TNext
+    &TOB #64 + &TOB #193 copy #193 !TNext
     &TOB #193 + #64 [ #32 over store n:inc ] times drop ;
 ---reveal---
   :c:put<TOB> (c-)